October 1980 $2.00 

Extended TRS-80 Basic • Tracking Stocks • Word Search Puzzles 



Personal 




IM^PPP 









y ° Ur link to 



e World 



Income Statements 
Pricing Your Product 
Computer- Assisted Grading 
New Radio Shack Computers 



Computing 

J^For Your Home and Business 



MODEMS 




T&K 

EWUESTHEMT 

RECOUP 

KgEPatNi© 

©I960 TEXRS INSTRUMENTS 



HDME 

FINRNCIRL 

DECISIONS 



© 1978 TEXRS INSTRUMENTS 



£§£Sg E 

LEASES 

DEPRECX AT ION 
CVfiLUfl T E INVESTMENT 
RATE QF RETURN 

PoR&^xZl* 1 - " N " LVSlS 

snve pile 

CLEAR SYSTEM 



MOVE 1 
WHITE 



THING 



| V OUR CHOICE? IQ 



ENTER MOVE 



Announcing Texas Instruments 
Author Incentive Program... 
win up to $3,000. 



Texas Instruments is looking for unique home computer 
programs. If you have some, we can help you turn them 
into profit makers.To begin with -you could win up to $3,000. 
You’ll still own the programs...we may help you sell them. 



One of the most exciting things about the 
home computer revolution is discovering 
the many ways a computer can be used. 

If you’ve been working with small com- 
puters for a while, chances are you’ve de- 
veloped some innovative application 
programs. This is your chance to put 
them to work — for a profit. 

Tbxas Instruments is looking for qual- 
ity programs. We’ve created an Author 
Incentive Program to make it worth your 
while. The award for the top program 
will be $3,000. And there are five $1,000 
awards, plus twenty $500 awards. All 
winners will be recognized with national 
publicity. Even if you don’t receive one of 
these monetary awards, we may see 
enough market potential for your pro- 



gram to help you develop it and sell it. 

We want programs that offer real util- 
ity and lasting value. Programs that are 
self-teaching, that communicate on hu- 
man terms. After all, the TI Home Com- 
puter was designed to be the first home 
computer the whole family can use. 

TI is interested in education, personal 
finance and technical or managerial pro- 
grams for professionals. Home manage- 
ment programs, hobby and simulation 
programs. We prefer that your submis- 
sions exclude entertainment packages. 

Your entry can be a program you’ve 
created for use on the TI-99/4 or other 
microcomputers — in any high-level lan- 
guage, from Pascal and BASIC to FOR- 
TRAN or COBOL — or even assembly 



language. All the way up to 48K RAM. 

Keep in mind that programs for the TI 
Home Computer can incorporate high- 
quality color graphics, music and sound 
effects, and TI’s remarkably-human syn- 
thesized speech. 

Tb submit an entry, call the toll-free 
number below or use the reader ser- 
vice card in this magazine. We’ll send you 
an entry submission form plus full 
details. Please don't send 
anything until you receive 
and fill out this entry 
form. 

Programs must be in by 
November 15, 1980 — so 
get your entry form soon. 




For an entry form, call 1-800-858-4565 . 

Call between 8 a.m.-4:80 p.m. CDT, Mon-Fri. In Texas call 1-800-692-4279. 



© 1980 Texas Instruments Incorporated 
Offer void where prohibited by law. 

Author Incentive Program not open to TI employees, 
TI consultants and contractors or their families. 
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I LEADERSHIP IN COMPUTER PERIPHERALS 

A Division of Mountain Computer, Inc. 

300 Harvey West Bfvd., Santa Cruz, CA 95060 
(408) 429-8600 
Music I can play? Send details. 



’Apple is a trademark of Apple Computer, Inc. 
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MusicSystem generates the sound of any musical 
instrument— neal or imagined! Solo or sextet. Rock 
or classical. Ilaid-back or loud. At home or in the 
concert hall <|r classroom. MusicSystem sets new 
standards for computer generated music. 

Digital Synthesizer with 16 voices. Stereo output. 
Polyphonic-miulti-voice chords and note sequen- 
ces. Additive synthesis of instruments. Waveforms, 
envelopes, an® amplitudes are fully programmable 
for each voice to create instrument definitions and 
music dynamics. 32 Khz sample rate. Frequency 
resolution isf.5Hz steps. Graphical input of she0t 



music on JTigh-resolution screen using standard 
music notation. Print out sheet music with/ a 
graphics^/printer. Complete software operating 
system;/ Graphical music editor using light pen 
(pr.omJed), game paddles, or keyboard. Pre- 
entered music provided for immediate playing 
and enjoyment. Thorough documentation and 
tutorial user's manual. 



Drop by your Applet Dealer and ask to hear for 
yourself. You’ll know \yhat we mean when we say 
MusicSystem is all the instruments anyone with an 
Apple can play! 



Available at Apple Dealers worldwide 




OCTOBER 1980 



VOL. IV, NO. 10 

Personal Computing 

JJ^For Your Home and Business 




Page 32 



LAUNCHING PAD 

Computer-Assisted Grading 28 

Teachers can determine grades with this program, which combines two 
approaches: grades based on performance against an absolute standard and by 
relative performance within a group, by Reginald D. Gates 

Radio Shack Announces Three New Computers 32 

Radio Shack introduces a pocket computer, a TRS-80 Color Computer and a 
Model III. Specifications, features and prices are outlined, by Ken Mazur 

Novice’s Notebook: Problem Solving and Computers by David Lubar 49 

A Computer Spelling Exercise by Jeremy C. Jones 54 
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DIGGING IN 

Modems: Your Link to the World 60 

This month we look at modems, devices that enable your microcomputer to 
communicate over standard telephone lines with other micros or with time 
sharing mainframes. This article explains principles of operation and character- 
istics, plus provides a chart of vendors, by Ken Mazur 

Extended Basic for Your TRS-80 70 

This program allows you to input lines of enhanced Basic source code and then 
translates the code into Level 11 TRS-80 Disk Basic. You can save the resulting 
program on disk for normal usage, by William F. Stockwell 



ON THE LIGHTER SIDE 

Word Search 34 

Create word search puzzles, like those found in daily newspapers, for your 
children and friends, by Mike Fischer 

Alice in Wonderland 56 

A game featuring you as Alice searching for the Rabbit, with the Queen and 
Mad Hatter complicating your quest, by Hugo T. Jackson 

A Traveler’s Restaurant Guide . . .66 

Travelers who delight in sampling several restaurants in the cities they visit can 
use this program to keep track of where they’ve eaten and their impressions of 
the cuisine, by G.R. Boynton 



IN THE MONEY 

Income Statements 24 

Take the tedium out of preparing income statements. You can use this program 
for your business or family finances, by W.B. Goldsmith, Jr. 

Pricing Your Product for a Two-Step Distribution Channel 40 

This program lets you develop a pricing structure for manufactured goods, 
based on quantity price breaks. You can account for various gross margins 
required by the retailer, wholesaler and manufacturer, by Ira S. Gerson 

Using Moving Averages To Track Stock Prices 44 

Knowing the frequencies of the most dominant stock market cycles can help 
you determine when the next cycles — and lows — will repeat, by E.D. Shafer 

Cash in on the Power of Pascal 52 

Those of you with old silver coins stashed in jars and piggy banks can use this 
program to figure out their “melt value.” by Sam Gaylord 
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Now,.. 

Intelligence beyond your CRT 




Xymec's HY-Q 1000™ Series brings 
microprocessor capability to print- 
ing. This fast, letter quality, intel- 
ligent printer/typewriter expands 
the capability of your computer 
or word processing system. 

Xymec gives your system more 
of the features you want most: 

• LE.D. display 

• tractor feed 

• RS232, IEEE-C779 interface 



Compatible with nearly all micro- 
computers, the HY-Q 1000™ Series 
prints boldface and IfcWfeijJil . centers 
titles, sets columns and right jus- 
tifies. Your choice of three pitches 
and proportional spacing, with 
minimum throughput print speed 
of 20 cps. Changing print wheels 
or type styles takes but seconds. 



Intelligent printing makes • 

good sense to me: Send j 

me more information 
and the name of my 
local dealer. 

Name : 

Title [ 

Company | 

Address j 

City j 

State Zip j 

Telephone ■ 

Xymec, Inc. 

17905 Sky Park Circle, Suite J 
Irvine, CA 92714 




The Value Standard in Printers 




Xymec gives you more features 
than any other machine on the 
market, regardless of price! 

Xymec intelligent printers won't 
create a service nightmare. Reliably 
constructed, the HY-Q 1000™ 

Series is built with serviceability in 
mind. And with service centers 
nationwide, maintenance is easy 
and convenient. 

Give your computer system the 
intelligent edge. Join up with 
Xymec. For more information, send 
in this coupon today. 



Xymec, Inc. 

Subsidiary of Litronic Industries 
17905 Sky Park Circle, Suite J 
Irvine, CA 92714 (714) 557-8501 
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RAYGAM 

SUMMER 

SPECIALS 



BLANK DISKETTES 



LIST 

$40.00 

40.00 

45.00 

60.00 



RAYGAM 

28.00 

28.00 

30.00 

40.00 



BASF 

VERBATIM 
MEMOREX 
DYSAN 

(5J4, soft, 10 or 16 sector, SD, Box of 10) 

8 " SOFT GEORGIA MAGNETICS 50.00 30.00 

(While quantities last) 

MOUNTAIN HARDWARE FOR APPLE 20% OFF 

APPLE CLOCK 280.00 224.00 

SUPERTALKER 300.00 240.00 

ROMPLUS W/FILTER 200.00 160.00 

(call or write for complete list) 

20% OFF ALL APPLE SOFTWARE -muse 

PERSONAL SOFWARE, PROGRAMMA, SOFTWARE AND MORE 

MICRO SOFT Z-80 LANGUAGE CARD 



Turn your 6502 Apple into Z-80 compatable 350.00 315.00 



Prices good through Aug. 31, 1980 
WE SHIP FREE IN THE CONTINENTAL U.S. 
To order or for more information, call or write: 



RAYGAM, INC. 



In Ca.(714) 

Outside Ca. 

TOLL FREE (800) 



556-9895 

854-8379 



2737 Croddy Way, Bldg. E, Santa Ana, CA 92704 

MASTER CHARGE AND VISA CARDS HONORED (Ca. res. pis. add 6% sales tax) 
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What do you have in common with 
a plumbing contractor, an auto parts 
store owner and a real estate agent? 

The program you designed 
to help your business. 

That’s right. Your business application could be just the solution some- 
one else needs for their business problems. And Personal Computing is 
looking for business applications of all types - whether tailored to your 
own company needs or applicable to any business. Of course, the more 
flexible your program, the greater your chance of seeing it in print. 

But we can’t publish it until you submit it. So why not send us your 
program? Be sure to include your program listing, program description, and 
sample run. 

And we’re not just interested in business applications. Send us your 
home and personal management, educational or recreational programs - in 
fact, send us any program you’ve written that helps you solve a problem 
or have fun with your computer. 

Your program may help others; in return they may help you by improv- 
ing on your work. And, if we publish your piece, we’ll send you a check to 
add to your nest egg. 

So, mail your material to: Don Wood, Managing Editor, Personal 
Computing , 1050 Commonwealth Ave., Boston, MA 02215, or call 
us at (617)232-5470. 
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For those special people who’ ve 
stepped ahead with a mini-computer 




Maxell offers a way to stay ahead. 



A Maxell 514" Mini-Disk will consistently let you maxi- 
mize the capability of your system today. And as your 
involvement with it grows, tomorrow as well. Maxell 
Mini-Disks are all made with the same exacting 100% 
certification and critical dependability of the Maxell 8" 
Floppy Disk. So you know your 514" Maxell Mini-Disks 
meet or exceed the same ISO and Shugart specifica- 
tions industry requires. 



There are double density Maxell single and double- 
sided 5Yf Mini-Disks for soft and hard sector systems. 
And 8" Maxell Floppy Disks for every disk drive config- 
uration. See your computer supply dealer or write to us 
for more information. If you are a computer products 
dealer, write for the growing opportunities Maxell 
Business Products Division offers you with our 8" Floppy 
and 514" Mini-Disks. 



maxell 




BUSINESS PRODUCTS DIVISION 

Maxell Corporation of America, Business Products Division, 60 Oxford Drive, Moonachie, N.J. 07074 Tel: 201-440-8020 
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FEEDBACK 



Missing Key 

Dear Editor: 

In spite of the convenience of the 
TRS-80 numeric keypad for inputting 
large amounts of numeric data, it has 
one flaw that has thoroughly annoyed 
me, and perhaps other users, many 
times. This flaw is the absence of a 
(comma) key on the keypad. Such a key 
seems to me to be essential for using 
multiple variable INPUT statements, 
and without it, one either has to ( 1) stop 
typing on the keypad, reach over all the 
way to the main keyboard, press the 
key, then return to the keypad and 
type the next number; (2) use the right 
hand to enter the numbers on the key- 
pad while keeping the entire left hand 
hovering over the comma, waiting for 
the proper moment to strike; (3) hit 
ENTER after each number is typed, 
allowing any information at the top of 




the screen to scroll off; or (4) give up 
the keypad entirely and use the numeric 
row at the top of the main keyboard. All 
four of these approaches are either 
time-consuming, loaded with the 
potential for error, or both. 

However, filled with the determina- 



tion of any good computer jockey not to 
be overcome by the limitations of the 
equipment, and my own natural in- 
clination to make things as easy for 
myself as possible, I wrote the follow- 
ing short program. It can be added to 
any program as a subroutine, and simu- 
lates the function of a comma key on 
the numeric keypad. (See Figure 1.) 

As you can see, the separating 
comma is simulated by entering the 
decimal point twice. (Incidentally, this 
in no way interfers with the normal 
function of the decimal point.) Lines 10 
to 90 are the main program to which the 
subroutine is added. Line 30 would 
have originally read, 30 INPUT A,B,C. 
Change it now to INPUT A$ and 
GOSUB, and add line 35 to assign the 
numeric values of the “X” strings to 
the variables used by the main pro- 
gram. The subroutine can be changed if 
more or less than three variables are to 
be input at once; just change the counter 
in the Z-loop in 1010, and the IF/THEN 
statement in 1080 to the appropriate 
number, and correct the variable 
assignments in 35. Before adding this 
subroutine to any program, check to 
find the proper variable names you 
want to input, and check for and change 
any of the variables in the subroutine 
which would interfere with those al- 
ready used in the program. With this 
method, one can now have fast entry of 
numbers from the numeric keypad. The 
computer takes about 1/2 second to 
process the numbers, but input time is 
so speedy I am spending at least 50% 
less time than I formerly did with this 
operation. As far as I am concerned, the 
only drawback that the routine has is 
that it can’t be used to enter long DATA 
lines when programming! 

While I am writing, I want to com- 
pliment and thank the staff of Personal 
Computing for continuously putting out 
such an enjoyable and exciting maga- 
zine. I subscribe to several computer- 
oriented magazines, but PC is my 
favorite, and the amount of information 
and pleasure I have received from it are 
immeasurable. 

Robert P. Aden 

Murfreesboro, TN 



Program Listing 

10 .#**** "ORIGINAL PROGRAM" ***** 

20 ? "INPUT THREE NUMBERS" 

30 INPUT A$ : GOSUB 1000 '***** (INPUT A,B,C) 

35 A=VAL(X$(1) ) : B=VAL(X$(2)) : C=VAL(X$(3)) 

40 ? A; B; C; A+B+C 

50 ? "("; A; "*"; B; ") /"; C; "="; (A*B)/C 

60 ? A; B; "T ABS("; C; ") ="; A-BtABS(C) 

70 ? : GOTO 20 

8o t***** END ORIGINAL PROGRAM ***** 

90 END 

10 00 '***** COMMA SIMULATOR SUBROUTINE ***** 

1010 FOR Z=1 TO 3 
1020 X$(Z)="" 

1030 L=LEN (A$ ) 

1040 Q=0 : FOR Q=1 TO L 
1050 F$=MID$( A$,Q,2 ) 

1060 IF F$ = " . . " THEN 1100 
1070 X$(Z)=X$(Z) +LEFT$ ( F$ , 1 ) 

1080 NEXT Q : IF Z=3 THEN RETURN 
1100 L=L- ( LEN (X$(Z))+2) 

1110 A$=RIGHT$(A$,L) 

1120 NEXT Z 

Sample Run 

INPUT THREE NUMBERS 

? 37. .2.93. .-15.8 

37 + 2.93 + -15.8 = 24 .13 

( 37 * 2.93 ) / -15.8 = -6.86139 

37 - 2.93 t ABS(-15.8 ) = -2.37963E+07 Figure 1 
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Now NRI takes you inside the 
world’s most popular microcomputer 
to train you at home as the # 
new breed of computer specialist! 



NRI teams up with Radio Shack 
to teach you how to use, 
program and service 
microcomputers . . . make you 
the complete technician. 

It’s no longer enough to be just a 
programmer or a technician. With micro- 
computers moving into the fabric of our 
lives (over200,000 of the TRS-80™ alone 
have been sold), interdisciplinary skills 
are demanded. And NRI can prepare 
you with the first course of its kind, 
covering the complete world of the 
microcomputer. 

Learn At Home 
in Your Spare Time 
With NRI training, the program- 
mer gains practical knowledge of hard- 
ware, enabling him to design simpler, more 
effective programs. And, with advanced 
programming skills, the technician can 
test and debug systems quickly and easily. 

Only NRI gives you both kinds of 
training with the convenience of home 
study No classroom pressures, no night 
school, no gasoline wasted. You learn at 
your convenience, at your own pace. Yet 
you’re always backed by the NRI staff and 



47 



Training includes TRS-80 computer, transistorized 
volt-ohm meter, digital frequency counter, 
and the NRI Discovery Lab with hundreds of tests 
and experiments. 



your instructor, answering questions, giving 
you guidance, and helping you over the 
tough spots. 

Explore the TRS-80 
Inside and Out 

NRI training is hands-on training, 
with practical experiments and demon- 
strations as the very foundation of your 
knowledge. You don’t just program your 
computer, you introduce and correct faults 
. . .watch how circuits interact. . . interface 
with other systems... gain a real insight 
into its nature. 

You also build test instruments and 
the NRI Discovery Lab, 
performing over 60 
separate experiments 
in the process. You 
learn how your 
trouble-shooting 
tools work, and gain 
greater understand- 
ing of the informa- 
tion they give you. 

Both microcomputer 
and equipment come 
as part of your train- 
ing for you to use 
and keep. 



NRI Schools 

McGraw-Hill Continuing 
Education Center 
3939 Wisconsin Avenue 
Washington, D.C. 20016 

NO SALESMAN WILL CALL 

Please check for one free catalog only. 

□ Computer Electronics Including 
Microcomputers 

□ TV/Audio/Video Systems Servicing 

□ Complete Communications Electronics 
with CB • FCC Licenses • Aircraft, 

Mobile, Marine Electronics 

□ CB Specialists Course 



Send for Free Catalog... 

No Salesman Will Call 

Get all the details on this exciting 
course in NRI’s free, 100-page catalog. It 
shows all equipment, lesson outlines, and 
facts on other electronics courses such as 
Complete Communications with CB, TV and 
Audio, Digital Electronics, and more. Send 
today, no salesman will ever bother you. 
Keep up with the latest technology' as you 
learn on the world’s most popular computer. 
If coupon has been used, write to NRI 
Schools, 3939 Wisconsin Ave., Washington, 
D.C. 20016. 

Ji <*>» 



All career courses 
approved under GI Bill 
□ Check for details. 



□ Digital Electronics • Electronic 
Technology • Basic Electronics 

□ Small Engine Repair 

□ Electrical Appliance Servicing 

□ Automotive Mechanics 

□ Auto Air Conditioning 

□ Air Conditioning, Refrigeration, & 
Heating including Solar Technology 



Name 



(Please Print) 



Street 



(TRS-80 is a trademark of the Radio Shack division of Tandy Corp.) 



City/State/Zip 

Accredited by the Accrediting Commission of the National Home Study Council 173-100 
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Software for 
Lower Case Mods 

Dear Editor: 

I’d like to address David Rose’s article 
“Moving Up to LowerCase,” July 1980. 



On page 58 under the heading “Use 
with other software,” he brings out the 
point that Radio Shack’s mod elimi- 
nates the use of a large amount of exist- 
ing software. Well, I have purchased 
two products that I believe your readers 
would like to be aware of. They are 



described below, and have been in exist- 
ance since late last year. 

In PencilC, the modifications de- 
scribed were done with permission of 
Michael Shrayer Software Co. and are 
available only by returning the original 
media cassette to Lords. 

PencilC will operate on both the 
Shack lower case mod and the original 
type modification done by progressive 
individuals much earlier. Radio 
Shack’s lower case mod works great 
with PencilC so now people who prefer 
Radio Shack’s descending characters 
don’t need to be limited in their soft- 
ware use. 

The Shift Down Arrow has been 
converted to the control key, and the 
button will still operate as shown in the 
Electric Pencil manual. The Form Feed 
is now a “Control L.” Although the 
options are executed in the sub- 
command mode (K), none of them 
appear in the command list on the 
screen. 

The authors of the modification 
didn’t stop until they had all the meat in 
the pot. So to quiet the hungry savages 
they added “Free,” which tells the 
typist how much memory is left 
unused. 

For “Speed Freaks,” they included a 
high speed clock control. This is an 
automatic software routine for systems 
that have a hardware clock speed-up 
board installed. It not only allows faster 
input of text and handling routines, but 
eliminates the loss of character which 
sometimes happens at the end of a 
video line. For systems with the proper 
hardware modification, the software 
automatically “kicks” the clock into 
high speed and resets the clock slower 
for disk I/O, line printer output, and 
TRS232 output operations. Those 
machines that trouble with high speed 
clock and upper memory stability can 
use “option K” in the sub-command 
file to shut off the high speed clock. 

The Special Character Definition 
option allows the operator to define the 
Shift Back Arrow, normally used to 
erase the previous character, as any 
printable character on the printer. This 
is especially useful to systems with 
“daisy wheel” printers to allow access 
to all but the first and last characters. 

Once a special symbol is entered to 
text, the Shift Back Arrow may be re- 
defined for another character. Once this 
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There’s only one originate /answer 
modem that gives you the performance 
and reliability of a direct connect 
modem with the portability and price 
of an acoustic. Novation’s new D-Cat. 

D-Cat is the only direct modem 
that’s FCC approved for handset jack 
connection with any modular phone. 
Use it at home or at work on a 50-pin, 
six line business phone. Talk to 
D-Cats, Cats, or any other Bell 103 
compatible modem. 

D-Cat also has all the features you 
want: full duplex capability, voice/data 



monitor, up to 20 dB performance 
improvement over acoustic, hold 
function, privacy button, self-test, 
and a remarkable price. Only $199. 

But best of all, it’s from Novation. 
The recognized world leader in 
personal communications. 

D-Cat.* 

Novation 

Call for details: 

(800) 423-5410 

In California (213) 996-5060 



Available at Avnet Electronics, Hamilton Electro, Hamilton Avnet, Kierulff Electronics, Byte Shops, 
Computerland, and your local computer store. 

Novation, Inc., 18664 Oxnard Street, Tarzana, California 91356 



D-CatT 
Everything 
youll ever need 
in a basic, direct modem. 



8 Personal Computing October i 980 



TRS-80 Model II 

Software for the Radio Shack TRS-80 Model II micro- 
computer is being readied at this moment by TBS. 
However, ads are prepared well in advance of publi- 
cation, and we don’t know exactly what will be ready 
at this time. Please call or write for a catalog. We 
are planning to have demonstration diskettes of our 
programs in our Dealer stores so you may see the 
features of our software. Although Radio Shack 
Computer Centers may not sell our software, each 
of them now has a copy of our new Mailing List 
Program for the Model II. This program, so new it 
is not named yet, is the apex of mail programs. 
Starting with the capability of ONE MILLION names 
and the extremely easy operator keyin module, TBS 
has built on their experience with the only endless 
system for the Model I. It must be seen to be 
believed! 

Ask your dealer, call or write for your catalog. TBS 
remains your publisher of the most sophisticated, 
yet easy to use, software on the market. 





P.O. Box 49104, Atlanta, Georgia 30359 (404) 296-2003 
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FEEDBACK 



option is used however, the original 
Shift Back Arrow cannot be used to 
erase until you reboot the PencilC pro- 
gram. 

“Page Halt” commands the Pencil 
printer output to stop at the end of each 
page as set by the sub-command (K) G 



function or the Top of Page Indicator in 
the text. The purpose of the option is to 
allow insertion of a new sheet of paper 
or to change print elements, change 
margins, line length, reset print spe- 
cifiers, and so forth. Pressing 
“ENTER” will continue the printing, or 



by pressing the “BREAK” key the print 
cycle can be terminated and the page 
numbering option will be automatically 
reset to the original value. 

Quime or Diablo users will want to 
know about the special RS232 driver. 
Sub-command “UB” allows use of 
these high speed printers at their rated 
speed without having to use Null char- 
acters for carriage returns. The RS-232 
switches are used characters for car- 
riage returns. The RS-232 switches are 
used to set the baud rate, parity and 
word length. 

Trendata 1000 users have a special 
correspondence printer driver available 
for cassette use. The baud rate is auto- 
matically set to 134.5 and all characters 
are automatically set for the Courier 10 
print element. Also the Special Char- 
acter Definition option will allow back 
spacing and limited underlining. 

The cost is $35 and the Electric Pen- 
cil “C” can be used with the following 
DOS: TRSDOS 2.1, 2.2, 2.3 and 
NEWDOS. Customers should send us 
their original cassette of Pencil (disk 
version stamped on the case). We’ve 
heard all kinds of excuses for not send- 
ing the original cassette, so if you’ve 
recently had a fire send $175 and we 
will send out a new cassette, with Pen- 
cilC disk version on it. Be sure to men- 
tion your memory size. 

Lords also offers a lower case soft- 
ware mod for use with Radio Shack’s 
hardware mod. It allows use of soft- 
ware normally mentioned on Shack’s 
“Forbidden List,” and is loaded utiliz- 
ing the “AUTO” command on the DOS. 
We charge $20 for it. 

Allen Barker 
Lords 

P.O. Box 99 

Port Angeles, WA 98362 



Letters . . . 

Have you found a bug? Got a gripe? 
Want to tell our readers about your 
successes, failures or fascinations? 
Send your comments to the Feed- 
back editor, Personal Computing , 
1050 Commonwealth Ave. , Boston, 
MA 02215. We’ll review each letter 
and publish the most interesting and 
valuable submissions. 




MM-103 MODEMS 

With our unbeatable quality, 
low cost, one-year warranty 
and 24 hour a day Test Center, 
you won't find a better S-100 
bus modem than the MM-103! 









Call or write for brochure 
and price information: 

<# 0 > 

POTOMAC MICRO-MAGIC, INC. 

5201 Leesburg Pike, Suite 604 
Falls Church, VA 22041 
(703)379-9660 (VOICE) 
(703)379-0303 (MODEM: 61-600 BAUD) 



MEETS IEEE S-100 STANDARDS 






^ fvP*' 



f micro . - . . 

V ITlagicJ AFTER ALL... 
ALL MODEMS 
ARE NOT 

CREATED EQUAL ! 
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Pediatric Information System 




Your four-year-old son scurries in 
from playing outdoors, complain- 
ing of itching around his ankles. 
After questioning him on where 
he’s been and examining the rash, 
you realize it must be poison ivy. 
What should you apply to it, if 
anything? How long before it dis- 
appears? You turn to your micro- 
computer for help. 

Mathemedics, Ltd., a new, 
small company in southern Cali- 
fornia, is working toward making 
it possible for parents to get 
medical information from their 
micros. Matthew Witten, presi- 
dent of Mathemedics, said, “We 
wanted to design medical infor- 
mation systems — not only in- 
formation systems but medical 
mathematical research and model- 
ing.” And, says Witten, a parent 
himself, “I got tired of calling 
my pediatrician.” 

The system, known as the Syn- 
tactical Pediatric Evaluation Di- 
agnostic System, is compiled 
from information from published 
medical material. Witten has had 
three years of med school but 
says the system will be checked 
for accuracy before it's released 
to the public. 

Witten explained that the sys- 
tem operates in several modes. 
You’d use the critical mode if 
you already knew what the prob- 
lem was but needed emergency 
information. You would type in 
the problem and the computer 
would come back with a standard 
set of information. With this 
mode, there’s no time to diag- 
nose what the problem is. 

Another mode, for non-emer- 
gency situations, handles treat- 
ment information. For instance, 
your child might have something 
in his/her eye and you can’t re- 
move it; or a child could be run- 
ning a fever of 105° and you 
don’t know what steps to take.’ 



A third interactive mode pro- 
vides clinical information. You 
can type in a question and get 
answers in various areas. Poison 
ivy might come under this mode. 
“Let’s say your child had a rash 
that you were'nt worried about 
but you wanted to find out 
about it. You'd tell the computer 
you needed information on gen- 
eral rashes and it would tell you 
a little about skin rashes. Then, if 
you wanted information about 
poison ivy, the computer would 
offer more specific information 
about it,” explained Witten. 

The diagnose mode specifical- 
ly deals with trying to diagnose 
what the problem is. It uses sta- 
tistical correlations to come up 
with what the top ten most prob- 
able diagnoses for the problem 
are. This, the most difficult and 
complex mode, is not yet on the 
small computers because it re- 
quires one megabyte of memory 
storage for the database. “What 
we're thinking of doing is shrink- 
ing the mode down and taking 
out the crucial things and making 
a smaller version,” said Witten. 

Mathemedics, run by Witten 



and his partner David Maloney, 
is divided into a research division 
and an applied systems division. 
The research division contains 
larger computers whereas the ap- 
plied systems division uses the 
microcomputers. 

Witten said, “We wanted a 
company that was not only com- 
puter oriented in the sense that 
we designed computer equipment 
software, but a company that 
someone could hire out to do 
statistical analysis of data.” 

Other Mathemedics projects 
include software for paraplegics 
which will enable them to read 
by blowing commands through 
pipes. The company also consults 
for a few hospitals, helping them 
with data analysis. 

Besides working for Mathe- 
medics, Witten is also a professor 
in the general systems depart- 
ment of the Institute for Safety 
and Systems and Management at 
the University of Southern Cali- 
fornia. He teaches business man- 
agement courses in mathematic- 
al modeling and computer simu- 
lation. 

— by Marjorie J. Morse 
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Personal Computing Welcomes S-80 Computing 



Personal Computing this month 
welcomes aboard over 7000 
subscribers to S-80 Computing. 

Computer Information Ex- 
change’s S-80 Computing and 
S-80 Bulletin publications have 
ceased publishing. Personal Com- 
puting will fulfill subscriptions 
to S-80 Computing on either a 
new or renewal basis. 

No longer able to justify op- 
erating redundant services in 
competition with a host of 
others, nonprofit CIE will con- 
centrate on People’s Software 
and its long-dormant Word Pro- 
cessing Letter , areas not served 
by others. 

CIE's People's Software pro- 
vides public-domain TRS-80 pro- 
grams for the cost of copying. 
Tapes with as many as 77 pro- 
grams are available for just 
$10.95. The organization now 
offers approximately 200 pro- 
grams on its five public domain 
tapes. In addition, People's Soft- 
ware offers a tiny Pascal compil- 
er for $19.95, with royalties to 
Pipedream Software in Australia, 
and other offerings. 

Word Processing Letter is de- 
voted to using personal computers 
for writing, either in the home or 
office. The first issue tells about 
a readily available 510 characters/ 
second daisywheel-quality print- 
er that is about ten times faster 
than the fastest “daisies,” yet 
only about twice as expensive. 
Also included is a wrap-up on the 
new copying machines that not 
only do what you expect of a 
copying machine, but which also 
output type and graphics from 
your computer and facsimile 
machine. Sometime in the not 
too distant future, all office 
printing will come out of the 
same box, said Bill McLaughlin, 
president of CIE. 

Word Processing Letter also 
has started a reader project of 
creating personal computer soft- 
ware to match features of the 
new IBM electronic-dictionary 
word processor. IBM stores 
50,000 words but the Word Pro- 



cessing Letter project will be 
more modest. Readers will share 
both the burden of creating the 
software and keyboarding all the 
words, which will be distributed 
on cassette. The Word Processing 
Letter costs $15 for 12 issues, 



Using a Pet computer, elementary 
students in Edina, MN, progressed 
up to 31 months over a seven 
month period in their language 
arts skills. While program devel- 
opers do not claim that this prog- 
ress is due solely to the Pet, the 
new teaching aid has been met 
with great enthusiasm by teach- 
ers, students and parents alike. 

Educational programs were 
written for the Pet by Thorwald 
Esbensen, president of Micro-Ed, 
Inc., based in Edina, a suburb of 
Minneapolis. In the fall of 1979, 
third and fifth grade students 
were given the Iowa Tests of 
Basic Skills and those who, on 
the basis of local norms, scored 
in the bottom quartile in the 
areas of capitalization, punctua- 
tion and English usage, and who 
were in schools having student 
support centers, were scheduled 
into these centers on a regular 
basis to receive microcomputer 
instruction. Student support 
centers were designed to help 
children in need of additional 
help with their studies. In the 
spring of 1980, these students 
were re-tested and considerable 
progress had been achieved. 

Four of six elementary schools 
in Edina had established student 
support centers. The students 
usually spent from 20 to 30 
minutes per session and were 
generally scheduled into the sup- 
port center for one or two ses- 
sions per week. There are from 
two to six Pets in each center 
and also some scattered through- 
out the schools in individual 
classrooms. 

Student support centers are 



and is also available from CIE. 

For a People’s Software cata- 
log or more information on the 
Word Processing Letter. y write 
to Computer Information Ex- 
change, Box 159, San Luis Rey, 
CA 92068. 



staffed by para-professionals 
who are acquainted in a “nuts 
and bolts” way with what pro- 
grams are available. There is one 
para-professional in each center 
and Esbensen works with them 
on a continuing basis. 

All of the student programs 
were written for the 8K Pet with 
a cassette recorder. “They are on 
cassette because it would cost 
just as much to buy a whole new 
computer as it would to buy a 
disk drive,” Esbensen said. There 
is also one printer in the central 
audio visual office for special 
purposes. 

The tapes are selt-contained 
and each stands alone, allowing 
interested users to build their 
own library of tapes. Most of the 
tapes sell for $7.95 each. 

The 59 fifth grade students 
participating in the English usage 
program progressed 20 months 
over a seven month period. A 
group of 67 fifth graders concen- 
trating on improving their punc- 
tuation skills also advanced 20 
months within seven months. 

The 73 fifth graders who studied 
capitalization over this same 
period gained 25 months. 

Third graders also concentrated 
on their studies with the com- 
puter for seven months: 35 stu- 
dents in English usage gained 27 
months; 39 in punctuation pro- 
gressed 31 months; and 43 in 
capitalization advanced 18 
months. 

“We do not make any kind of 
claim at all that these results 
were solely because we used 
micros,” Esbensen said. “It's my 
strong feeling that any time that 



Remedial Instruction by Computer 
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the school system or a classroom 
zeros in on specific student needs 
or areas where they need help, 
giving the necessary time to ad- 
just those weaknesses, and does 
so with appropriate materials, 
you can get very significant 
gains. ” 

According to Esbensen, micros 
offer a golden opportunity to 
zero in on student needs. They 
can provide the additional time 
to the student without taking 
the classroom teacher away from 
the full group. The children also 
loved to work with the micros, 
Esbensen said. “Never was reme- 
dial instruction sought with such 
eagerness as with the micros.” 

Esbensen noted that he was 
careful not to portray the com- 
puters as competition for class- 
room teachers. In most instances 
the children were recommended 
for computer-assisted instruction 



by the teachers and were sched- 
uled into the support centers at 
the convenience of their teacher. 
“We were very careful to avoid 
giving any impression that micros 
were somehow preferable to other 
teaching modes. We want micros 
to be the instructional allies of 
teachers,” Esbensen said. 

The Edina school system also 
offers an in-service computer 
training program for their teach- 
ers, taught by Esbensen. One two- 
day workshop is held for teach- 
ers in June as soon as school lets 
out. “It's a ‘shake hands with a 
micro' kind of workshop where 
they get to know the micros as 
being friendly machines. They 
use many of the programs that 
we’ve developed locally and they 
can see how simple the micros 
are to use and how very interest- 
ing you can make a program,” 
Esbensen said. In August they of- 



fer a similar kind of workshop 
for teachers, and in the fall Es- 
bensen teaches a 12-week Pet 
programming workshop for a 
limited number of staff members. 
He also teaches a programming 
course for some of the elementary 
school students along with a 
community education class in 
micros. 

Use of the Pets in this project 
has been funded totally by the 
Edina local budget. “We've had 
no special grants from anybody, 
no foundations, no special input 
on anything. We've done it all 
out of our own operating bud- 
get,” Esbensen said. “When you 
have elementary school principals 
in this day of budget cutting, 
putting down micros as a first 
priority, you know that some in- 
teresting things are happening. 
That's the situation here.” 

— by Elli Holman 



New Jersey Sales Center Demystifies Computers 



Silent Partner, a new computer 
sales center in Fort Lee, NJ, is 
devoted to demystifying the com- 
puter. “We see our task as help- 
ing our customers solve problems 
by means of the microcomputer,” 
says Peter Schwartz, president of 
Silent Partner. “We're dedicated 
to showing the average American 
— professionals, businessmen, stu- 
dents — how they can apply the 
microcomputer to business, edu- 
cation and personal matters.” 
Besides microcomputers, Silent 
Partner also stocks complete lines 
of computer accessories and soft- 
ware, he added. 

Silent Partner displays com- 
puter packages that are designed 
for specific business, educational 
and personal functions. They in- 
clude a complete word-process- 
ing system, a business forecasting 
and projection system, a stock 
market information system, an 
educational system and a com- 
plete business operations system. 

A fully equipped service de- 
partment enables the firm to 
make installations and adjust- 
ments rapidly and efficiently. . 



A separate seminar room with- 
in the Fort Lee headquarters ac- 
commodates training sessions, 
demonstrations, videotape screen- 



ings and discussions of computer 
applications. Computer users 
clubs will also be invited to use 
the premises for their meetings. 




‘ 7 think 1 m ready to be replaced by a computer* * 
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Home Time-Sharing Projections 



Consumers are flocking to sign 
up for home time-sharing services, 
and there may be as many as 
100,000, subscribers to these ser- 
vices by the end of 1981, accord- 
ing to a new 148-page report from 
International Resource Develop- 
ment Inc. There are currently 
two consumer time-sharing ser- 
vices in operation, with a com- 
bined total of about 8,000 users 
according to the report, which 
predicts entry into the market by 
several other “major” companies 
during the next three years. T otal 
revenues generated from these 
services could exceed $1 billion 
per year before the end of the 
current decade, and most of these 
revenues will be derived from the 
use of computer and communica- 
tions facilities which otherwise 
would have been idle during even- 
ings and weekends. 

Demand for the services re- 
cently has become so strong that 
the computer facilities have been 
overloaded, the report points out. 
However, both The Source and 
CompuServe are adding more 
computers and will be able to 
deal with the expected ten-fold 
expansion in the number of users 
over the next year or so. 

The Source has reached an 
agreement with Tymshare, one 
of the largest commercial time- 
sharing companies, to use Tym- 
share's computers in off-hours; 
CompuServe has several more of 
its own computers which could 
be made available as its consumer 
business expands. 

According to Charles W. New- 
ton, project manager for the IRD 
study, “Tymshare has very clever- 
ly positioned itself so as to ob- 
tain an inside view of the develop- 
ment of consumer time-sharing 
over the next three years, with- 
out needing to make a major 
commitment in terms of new 
computers and facilities.” New- 
ton views several other large time- 
sharing organizations, including 
General Electric Information 
Services and Boeing Computer 
Services, as possible entrants into 



the consumer time-sharing ser- 
vices market. 

The IRD report predicts that 
several years will elapse before 
the market for consumer time- 
sharing services broadens beyond 
its current user base of computer 
hobbyists and affluent gadget- 
lovers. However, because the ser- 
vices are nationwide, these cate- 
gories alone will provide good re- 
venue growth to suppliers through 



1985, according to the report. As 
Newton points out, “Of the ex- 
pected 1 million home computer 
users, 10%, or only 100,000 users 
will be accessing the time-sharing 
services from the home in 1981.” 
In an interview program con- 
ducted during the study, the IRD 
researchers asked all of the leading 
commercial time-sharing vendors 
how they expected the consumer 
time-sharing market to develop 



PROJECTED HOME TIME-SHARING MARKET THROUGH 1990 



AVERAGE MONTHLY EXPENDITURES 


1981 


1984 | 1987 | 1990 

MILLIONS OF HOUSEHOLDS 


$10.00 


.04 


.25 


1.00 


3.5 


$25.00 


.03 


.15 


.60 


1.3 


$50.00 


.02 


.10 


.30 


.7 


$75.00 


.01 


.05 


.15 


.2 


$100.00 




.03 


.10 


.2 


NUMBER OF HOUSEHOLDS 


100,000 


580,000 


2,150,000 


5,900,000 


ANNUAL EXPENDITURES 


$30-35M 


$175-200M 


$700-750M 


$1,500-1, 750M 



REASONS FOR USING HOME TIME-SHARING SERVICES 





SEGMENTS 


APPLICATIONS 

PROCESSING 


EDUCATION 


ELECTRONIC MAIL 


ENTERTAINMENT 


INFORMATION 

SERVICES 


PERSONAL 

COMPUTING 


TRANSACTION 

SERVICES 


WORD 

PROCESSING 


REASONS 


TIMELINESS 


X 




X 




X 




X 




COST EFFECTIVENESS 






X 






X 






AVAILABILITY 


X 


X 




X 


X 




X 


X 


FORMAT 


X 


X 






X 




X 




SOCIAL INTERACTION 






X 


X 










GROUP INFLUENCES 


X 


X 




X 


X 


X 


X 




SELF IMPROVEMENT 




X 






X 


X 




X 


ENTERTAINMENT 






X 


X 


X 


X 







SOURCE: INTERNATIONAL RESOURCE DEVELOPMENT INC. 



14 Personal Computing October i 980 



RANDOM ACCESS 



over the next five years; the re- 
sponse was about evenly divided 
between cautious optimism and 
downright skepticism, reports 
Newton. 

Included in the report is an 
analysis of the demographics of 
current and potential future users 
of home time-sharing services, 
with detailed projections of the 
expected levels of utilization of 
informational, transactional and 
educational services offered by 
the time-sharing vendors. Noting 
that CompuServe was recently 
acquired by H&R Block, the 


tax-preparing services company, 
Newton speculates that Block 
may have in mind an interactive 
automated tax-preparation ser- 
vice offering, which could be 
programmed to minimize the 
user’s taxes, while at the same 
time alerting the user to the per- 
centage probability of an IRS 
audit. “Maybe we’ll get to the 
point where Block’s computers 
can outwit the IRS computers,” 
comments Newton. 

International Resource De- 
velopment Inc. is an independent 
management consulting and mar- 


ket research firm, which has been 
studying the computer time-shar- 
ing market for the past nine 
years. In addition to several do- 
zen multi-client research reports, 
IRD has undertaken individual 
client consulting assignments for 
such firms as General Electric, 
Boeing Computer Services, AT&T 
and University Computing. A 
free description and table of con- 
tents for the report (#155), en- 
titled “Consumer Time-Sharing 
Services,” is available from IRD 
at 30 High Street, Norwalk, CT 
06851; (203) 866-6914. 


QUBE Subscribers Ha 

Subscribers to Warner Amex 
Cable Communications Inc/s 
two-way interactive QUBE ser- 
vice in Columbus, OH, will soon 
be able to retrieve information 
from data banks permitting a 
variety of consumer services in- 
cluding computer video games, 
stock market information, per- 
sonal financial management and 
other services. 

The service will begin this fall 
with a two-way interactive pro- 
ject by Warner Amex; Atari, Inc., 
a leading manufacturer of per- 
sonal computer systems and a 
subsidiary of Warner Communi- 
cations Inc.; and CompuServe In- 
corporated, a leading time shar- 
ing computer service company. 

Atari is a leader in the home 
video games industry and the 
coin-operated games business. 
CompuServe has provided com- 
puter services for more than 10 
years to some of the nation's 
largest business and government 
agencies. Headquartered in Col- 
umbus, OH, CompuServe is a 
subsidiary of H & R Block, Inc. 

A minimum of 100 Atari per- 
sonal computers will initially be 
installed in QUBE subscriber 
homes giving those subscribers 
access to data banks which are 
part of the CompuServe service. 
The service will be available to 
subscribers from 6 p.m. to 5 a.m. 
on business days and all day on 
weekends and holidays. 

QUBE households participat- 


ve Access to Data Ban h 

ing in the project will have access 
to data which will convert their 
homes into information centers 
containing millions of facts from 
major information providers. 

Through a cross-indexed infor- 
mation menu, subscribers will 
have at their fingertips computer 
video games, current financial 
and commodity news and diverse 
business analysis and money 
management information from 
some of the best financial sources 


:s 

available. Other data services 
may include: 

• Full coverage of sporting 
events from around the country 

• Consumer reports 

• Airline and bus information 
schedules 

• Emergency telephone num- 
bers including health procedures 
and poison antidotes 

• Employment listings, train- 
ing opportunities and the teenage 
job market. 


Preventing Stress-Ind 

Research that could lead to pre- 
vention of stress-induced heart 
attacks is being carried out at the 
University of Pittsburgh's West- 
ern Psychiatric Institute. Using a 
Digital Equipment Corporation 
MINC laboratory computer to 
control and analyze experiments, 
researchers are exposing volun- 
teers to testing that places them 
under psychological stress. The 
test procedure may help to deter- 
mine which influences in a stress- 
ful daily routine could adversely 
affect the human heart. 

MINC is a modular computer 
system designed for laboratory 
applications. It incorporates spe- 
cial plug-in interfacing modules 
that enable a researcher to cus- 
tomize the system for specific ex- 
perimental applications. 

The experimental set-up, de- 


uced Heart Attacks 

signed by J. Richard Jennings, 
Ph.D., involves volunteers listen- 
ing to tones of slightly different 
pitches and acting on the basis of 
which tone is heard. The trans- 
mission rate, or schedule of times 
the tones are transmitted to the 
subjects' headphones, is con- 
trolled by the MINC system. When 
volunteers hear a tone, they have 
to decide whether it is the slight- 
ly higher or lower tone and press 
an appropriate button within a 
specific time interval. The order 
of tones is random, under com- 
puter control, and the tones are 
made difficult to hear by includ- 
ing noise in the earphones. 

According to Dr. Jennings, the 
speed and accuracy of the re- 
sponses are displayed to the sub- 
jects so that they can determine 
the quality of their actions. “We 
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vary the time interval in which a 
volunteer must respond so that 
some responses will be fast and 
inaccurate and others may be 
slow. All volunteers want to do 
well and some report emotional 
stress when asked to respond very 
quickly or slowly,” he said. 

Test results are evaluated to 
determine alterations in measure- 
ments such as rate of heart action 
and breathing. "We have known 
that there is a psychological com- 


ponent to some diseases,” Dr. 
Jennings said. “The research we’re 
doing is to determine components 
that may influence heart disease.” 
He added that some of his test 
volunteers are businessmen who 
work in high-pressure situations. 

“The MINC computer system 
is the major analytical element for 
our experimental program. In ad- 
dition to controlling the experi- 
ments, the MINC does major 
analyses, both in Basic and For- 


tran. For some statistical work, 
we send the data to a DEC system- 
10 mainframe,” Dr. Jennings said. 

“Our immediate goal in these 
experiments has been to begin to 
understand the relationship be- 
tween psychological stress and 
heartdisease in certain personality 
types. It is possible that once this 
is understood, methods can be 
developed that will help minimize 
or prevent coronary disease for 
such people,” he said. 


Computer News 

Small Computer News, a new bi- 
weekly newsletter covering the 
microcomputer field, is written 
for the computer hobbyist, man- 
ufacturer and retailer. Each issue 
contains up-to-date information 
on happenings in the microcom- 
puter business field, a new prod- 
uct previews, convention news 
and free-lance and career em- 
ployment opportunities. 

Charter subscriptions, includ- 
ing first class postage, are avail- 
able for $24.50 per year from 
Edwards Publications, 78-56 86th 
Street, Flushing, NY 11385. 

Educational 
Conference in Arizona 

In January 1981 The College of 
Education at Arizona State Uni- 
versity, Tempe, AZ, will host a 
special microcomputerconference 
designed to introduce educators 
to the many applications of 
micros in the classroom. 

The goal of the conference is 
to provide an awareness of micro- 
computers andtheir impact on 
society. In addition, the ways 
micros are currently being used in 
education at the elementary and 
secondary levels, in the fine arts 
areas, in career and vocational 
education, and in special educa- 
tion, will be explored. 

The conference will be held 
on the Arizona State University 
campus, Friday and Saturday, 


Announcements 

January 16 and 17, 1981. For 
further information and regis- 
tration materials, contact Dr. 
Gary G. Bitter, Arizona State 
University, Payne 203, Tempe, 
AZ 85281. 

Erie, PA 
Apple Club 

The Erie Apple Crunchers com- 
puter club is made up of 30 Apple 
and Bell and Howell Apple own- 
ers and users. The aim of the 
group is to exchange program- 
ming ideas and concepts. 

The club is developing a pro- 
gram library and is willing to ex- 
change original programs with 
other users groups or individuals. 
Membership dues is $7.50 an- 
nually. Theclubhopes to provide 
a monthly newsletter. For more 
information contact the Erie Ap- 
ple Crunchers Computer Club 
P.O. Box 1575, Erie, PA 16507. 

A New Home 

The Charles Babbage Institute 
for the History of Information 
Processing (CBI) has selected the 
University of Minnesota as its per- 
manent home. CBI is a nonprofit 
foundation which promotes re- 
search on the history of com- 
puters and computation. CBI is 
currently located in Palo Alto, 
CA. For more information con- 
tact Mr. Paul Armer at (415) 
328-0984. 


it it 

Chicatrug 

Chicatrug News, now in its third 
year of publication, provides 
monthly articles on items of in- 
terest to the TRS-80 user. A one- 
year subscription of twelve 
monthly issues is $12. For a free 
sample copy, write to E.B.G. & 
Associates, 203 N. Wabash, Suite 
1510, Chicago, IL 60601, (312) 
782-9750. 

Virginia Hamfest 

The Fifth Annual Tidewater 
Hamfest-Computer Show-Flea 
Market will be held in the Vir- 
ginia Beach, Virginia, Arts and 
Conference Center, October 4 
and 5 from 9 AM to 4 PM each 
day. Featured are ARRL, T raffic, 
DX, Technical Forums, XYL free 
bingo and lounge. Admission 
$3.50. There will be an advance 
ticket drawing for Kenwood FM 
transceiver. Flea market spaces 
are $3.00 a day. For tickets and 
information contact TRC P.O. 
Box 7101, Portsmouth, VA 
23707; include SASE. 

Unusual Application? 

If you use your computer for an 
interesting application, why not 
write up a short (500 or 1000 
words) article telling us about it? 
Send your submission to Random 
Access, Personal Computing , 

1050 Commonwealth Ave., 
Boston, MA 02215. 
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WE WILL NOT BE UNDERSOLD 




16K MEMORY UPGRADE KITS 2 for $85 $45 

for TRS-80*, Apple II, (specify): Jumpers $2.50 

PRINTERS NEC Spinwriter 

I Letter Quality High Speed Printer 

Includes TRS-80* interface software, quick 
change print fonts, 55 cps, bidirectional, 

| high resolution plotting, graphing, propor- 
tional spacing: R.O. $2579 

R.O. with Tractor Feed $2679 KSR with Tractor Feed $2995 
779 CENTRONICS TRACTOR FEED PRINTER $969 

Same as Radio Shack line printer I 
737 CENTRONICS FRICTION & PIN FEED PRINTER $799 

9x7 matrix 

730 CENTRONICS FRICTION & PIN FEED PRINTER $629 

7x7 matrix Same as Radio Shack line printer II 
PI CENTRONICS PRINTER $269 

Same as Radio Shack quick printer 
PAPER TIGER (IP440) $939 

Includes 2K buffer and graphics option 
TI-810 Faster than Radio Shack line printer III 

Parallel and serial w/TRS-80* interface software 

with upper and lower case and paper tray $1599 
OKIDATA Microline 80 Friction and pin feed $559 

Tractor Feed, friction, and pin feed $679 

EATON LRC 7000 + 64 columns, plain paper $299 

ANADEX DP-9500 $1359 DP-8000 $825 

DISK OPERATING SYSTEMS 

PATCHPAK #4 by Percom Data $ 8.95 

CP/M® for Model I, Zenith $145- for Model II, Altos $169.00 
NEWDOS Plus 40 track $ 99.00 

NEW DOS 80 $135.00 

ACCESSORIES 

HEAD CLEANING DISKETTE: Cleans drive Read/Write head in 
30 seconds. Diskettes absorb loose oxide particles, fingerprints, 
and .other foreign particles that might hinder the performance of 
the drive head. Lasts at least 3 months with daily use. Specify 
5 Vi " or 8". $20 ea/$45 for 3 

FLOPPY SAVER: Protection for center holes of 5 Vi" floppy disks. 
Only 1 needed per diskette. Kit contains centering post, pressure 
tool, tough 7-mil mylar reinforcing rings. Installation tools and 
rings for 25 diskettes. $11.95 

Re-orders of rings only $ 7.95 
EXTERNAL DATA SEPARATOR: Eliminates data separation prob- 
lems (crc). Improves reliability. This plug in unit comes fully 
assembled and tested. $29.95 

RS232 $84.00 

DISK-DRIVE EXTENDER CABLES: Fits all mini disk drives. 

$16.95 

SIX (6) PRONG ISOLATOR $54.00 

AC FILTER/6 PRONG POWER STRIP $39.00 

DISK DRIVE CABLES: 2 drive $29.00 4 drive $35.00 

DUST COVERS: TRS-80/Apple $ 7.95 

PLASTIC DISKETTE HOLDER $ 8.00 

RF MODULATOR: Adapts video to TV $35.00 

TRS-80 & OTHER MYSTERIES $18.95 



CAT MODEM Originate and answer same as 
Radio Shack Telephone Interface II 

LEEDEX MONITOR Video 100 
ZENITH Color Monitor 
SANYO Model VM 4509 Monitor 



$148 

$119 

$379 

$179 




DISK DRIVES 



$314 



40 track, 102K Bytes. Fully assembled and 
tested. Ready to plug-in and run the moment 
you receive it. Can be intermixed with each 
other and Radio Shack drive on same cable. 



FOR TRS-80* 

CCI-100 

CCI-280 

CCI-800 

For Zenith Z89 

CCI-189 

Z-87 



TRS-80* compatible silver enclosure, 
warranty. One year on power supply. 

card edge included. 

5V4", 40 Track (102K Bytes) for Model I 
5V4 ", 80 Track (204K Bytes) for Model I 
8" Drive for Model II {Vz Meg Bytes) 



90 day 

External 



$314 

$549 

$795 

$394 

$995 

$24 

$36 



5V4", 40 Track (1 02 K Bytes) add-on drive 
Dual 5V4" add-on drive system 
DISKETTES — Box of 10 (5 Vi")- with plastic library case 
8" double density for Model II (box of 10) 

COMPLETE SYSTEMS 

ALTOS 64K,DD,SS, 2-Drive, 1MB $3995 

TRS-80* Model II-64K $3499 

TRS-80* LEVEL II-16K with keypad $689 

TRS-80* Expansion Interface $249 

APPLE 16K $989 

HEWLETT PACKARD HP-85 $2999 

ZENITH Z89, 48K all-in-one computer $2555 

ZENITH Z19 $740 

TELEVIDEO 912B $745 920B $769 

ATARI 400 $489 ATARI 800 $769 

APF M1000 $99 IM-1 $499 

MATTEL INTELLIVISiON $249 



SOFTWARE FOR THE TRS-80* 5ES 



INTELLIGENT TERMINAL SYSTEM ST-80-III BY 
LANCE MIKLUS: Enables a TRS-80* to act as a dial- 
up terminal on any standard time sharing network. 
Provides a TRS-80* with control key, ESC Key 
Repeat Key Rub Out Key Break Key full upper and 
lower case support, selectable printer output and 
program selectable transmission rates $139 

CCA-DATA MANAGEMENT SYSTEM: Automate your 
information processing tasks. You can create a file of 
customer information; quickly and easily add, delete 
or update records; search a file; keep a file in order of 
the value in any field; and print records and labels in 
any desired sequence or from just a part of a file. 
Requires 32K TRS-80 and one drive. $74.95 

S & M SYSTEMS 

INSEQ-80™: Indexed Sequential Access Method 
(ISAM) for the TRS-80 Model I. A must for anyone writ- 
ing business programs. Eliminate wasted disk space 
from direct record processing. Split second access to 
any record. Access data records instantly via alpha/ 
numeric "key" eg. Part NR, zip code or sequentially in 
ascending key sequence. Add/modify records in any 
order. Access up to three files per program — Files 



may be spread over multiple disks. Machine language 
processing from your basic program. Utility program 
to convert direct files to INSEQ-80 format. $49.95 

FULLY INTERACTIVE ACCOUNTING PACKAGE: 

ISAM (INSEQ-80) based. Includes General Ledger, 
Accounts Payable, Accounts Receivable and Payroll. 
System runs "stand alone" or "co-ordinated G/L” at 
users option. Based on Osborne accounting method. 
Requires 32K, TRS-80, 2 or 3 drives. N/A CA. 

General Ledger $99 

Accounts Receivable $99 

Accounts Payable $99 

Payroll $99 

Osborne books: Req’d as additional documentation 
$20 ea 

INVENTORY Requires 32K, TRS-80, 1 drive $125 
INSORT-80: Callable form BASIC via USR. Sorts “Ran- 
dom" Disk Files. "Disk" to “Disk" sort times — 350 
records in 35 secs, 1000 records in 6 minutes, 3500 
records in 12 minutes. Machine language processing. 

Up to r 

build B 



rruo hi \c. niiiiuiea. lYiaunno ictnyuciyc ^luuwoniy. 

to 35 sort keys ascending/descending. Utility to 
j E^ASIC program. Runs under NEWDOS. $49.95 



CP/M BASED SOFTWARE for 
Zenith, Altos, Radio Shack, Apple 



Z-80 SOFTCARD FOR APPLE Your key to future soft- 
ware expansion. Get the best of both worlds, Apple’s 
6502 and CP/M Z-80. Plug in the card and get a Z80. 
Supports Apple language card and all Apple peripher- 
als. Comes with set of three manuals. $339 

CCI-TELNET VERSION 5: A communication Package 
which enables microcomputer users to communicate 
both with Large Mainframes and other microcom- 
puters. Extensive commands make it useful in many 
applications where communication between com- 
puters is necessary. Powerful terminal mode enabling 



user to save all data from a session on disk. Com- 
pletely CP/M compatible. Multiple communication 
protocols supported. Able to transfer files in both 
directions without protocol where the other machine 
does not support any protocol. Extensive ON- 
SCREEN help. Source code provided. $149 

MICROPRO -WORD-STAR: Menu driven visual word 
processing system for use with standard terminals. 
Text formatting performed on screen. Facilities for text 



paginate, page number, justify, center and underscore. 
User can print one document while simultaneously 
editing a second. Edit facilities include global search 



and replace. Read/Write to other text files, block 
move, etc. Requires CRT terminal with addressable 
cursor positioning. $399 



dealer (national/international) inquiries invited Send for FREE Catalogue 



The CPU SHOP 

TO ORDER CALL TOLL FREE 1-800-343-6522 

Massachusetts residents call (617)242-3361 

For detailed technical information, call 617/242-3361 

Hours: 10AM-6PM (EST)M-F(Sat.till 5) 

‘TRS-80 is a Tandy Corporation Trademark ® Digital Research 



5 Dexter Row, Dept. PC10M 
Charlestown, Massachusetts 02129 

Massachusetts residents add 
5% sales tax 

Quantities on some items are limited 
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JOYSTICK & EXPANDA- PORT 
FOR YOUR APPLE II s COMPUTER 




EVERY APPLE ll®OWNER SHOULD HAVE ONE! 




The PROGRAMMA JOYSTICK is an input peripheral that 
attaches to the APPLE II Computers game I/O Port. The 
JOYSTICK is a must for the serious game player, and it 
offers a degree of linearity not currently available with other 
joysticks. The ease of manueverability and the availability 
of the "functional" switches make the PROGRAMMA 
JOYSTICK a much needed enhancement to any APPLE II 
Computer System owner. The PROGRAMMA JOYSTICK 
comes completely assembled and tested. 



JOYSTICK $49.95 




EXPANDA-PORT $59.95 



PROGRAMMA 
I l\ITE R INI AT I O INI AL, I INI C 



The PROGRAMMA EXPANDA-PORT is a multi-port ex- 
pander for the game I/O port of any APPLE II Computer 
System. In addition to allowing expansion for up to six 
devices, the EXPANDA-PORT contains a built-in speaker 
that replaces the function of the Apple M's speaker. The 
switch on the EXPANDA-PORT allow for the selection of 
the specific device desired and for the switching of that de- 
vice. No unplugging of any device connected to the 
EXPANDA-PORT is required. The PROGRAMMA EX- 
PANDA PORT comes completely assembled and tested. 



The PROGRAMMA JOYSTICK and EXPAN DA-PORT are 
available on a limited basis through your local computer 
dealer. Apple II is a registered trademark of Apple Com- 
puters, Inc. 



3400 Wilshire Blvd. 

Los Angeles, CA 90010 (213) 384-0579 • 384-1116 * 384-1117 
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GO 

FIRST 

CLASS 



Vi MByte 

TM-100-3 (Single-sided) 

Capacity (unformatted): 
500K bytes 
TPI: 96 or 100 
Tracks per side: 
80 maximum 
Recording density: 
5535 BPI 
Access time: 
• Track to track: 3ms 
• Average: 90 ms 




1 MByte 

TM-100-4 (Double-sided) 

Capacity (unformatted): 
1.000K bytes 
TPI: 96 or 100 
Tracks per side: 

160 maximum 
Recording density: 

5877 BPI 
Access time: 

• Track to track: 3 ms 

• Average: 90 ms 



At an economy Price 

It doesn’t cost anymore to go first class when it’s a Tandon 5 l A n flexible disk 
drive. The reason is simple. We’re the recognized leader in mini-floppy read/write 
head technology. In fact, our patented, double-sided head design is used by all the 
other major mini-floppy suppliers. And, it makes no difference if you buy one or 
one-thousand drives, you’ll always get the first class price/performance that’s 
made Tandon first choice among OEMs of word processing, small business sys- 
tems, and personal computers. Tandon is rapidly becoming the first name in 
mini-floppies because we offer up to one megabyte of storage capacity, the fastest 
access time, a choice of single or double-sided recording, and 96 or 100 tracks per 
inch. All with proven reliability at an unbeatable price. Because we are the leaders 
in head technology, Tandon mini-floppies are designed beginning with the head to 
assure dependability throughout each drive. With Tandon, going first class is both 
sensible and economical. 



landon 



Oqo Avp 

Chatsworth, California 91311 
(213) 993-6644 

Heads Above The Rest in Disk Technology 
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FUTURE COMPUTING 



Small Computers Come 
To The Rescue of Bis Business 



Big business and large institutions are 
discovering another side of computing 
— low-cost personal computers. Yes, 
the home computer is heading into the 
big business marketplace. Until recent- 
ly big business depended on big com- 
puters and if there was a need for com- 
puter power in a distant department, a 
terminal was located in that department 
which would be “on-line” with the big 
computer. 

Of course big computers require 
expensive hardware and high-paid pro- 
grammers, and if the application in that 
distantly located department was rela- 
tively small, it was still treated as a 
major undertaking by the centralized 
data processing department. A “little” 
application became a big headache 
using costly equipment associated with 
big computer centers and a high budget 
for programming time and planning. 
This common experience inhibited 
many “little” programming projects or 
applications. If the central computing 
staff was busy with “big” projects, the 
smaller applications were delayed 
further. 

Today there is a well defined trend 
toward decentralizing computer pro- 
cessing functions. At the lowest level it 
means placing terminals in far off 
places away from the center for data 
entry purposes. The next level of de- 
velopment is the recent increased use of 
minicomputers — smaller than big 
computers but still quite costly to main- 
tain. At the next level we have a new 
trend to add still other devices within 
the computer communicaton network. 
Big business is actually adding 
“home” microcomputers. These “new” 
microcomputers have various names 
such as Apple, Pet and TRS-80, which 
are not so new to you and me, but they 
are new to the world of big business and 
I predict that the economics of the sit- 
uation will force even greater use of 
them in the future. In other words don’t 
be too surprised if the next time you go 



Professor Parks is in the Department of 
Mathematics and Computer Science at 

Elon College, Elon College, NC. 



BY WILLIAM R. PARKS 

to the bank, you see a manager or teller 
key into an Apple II. 

Use of home microcomputers in big 
business is a natural evolution from the 
“dumb” terminal to the “intelligent” 
terminal. A home computer can act like 
an intelligent terminal in nearly the 

Economics will force 
even greater use of 
small computers 
in the future. 

same price range as the older popular 
CRT’s with keyboards. Home com- 
puters can not only communicate with 
big computers (as the older CRTs did), 
but they can also “down-load” infor- 
mation. And even when the main com- 
puter is “down,” the little computer 
sitting on the desk can continue to oper- 
ate. In fact, some banking institutions 
recently announced that for certain 
limited but necessary applications, the 
stand-alone home microcomputer was 
better than the big centralized machine 
from an economic standpoint. 

Such applications as figuring interest 
or answering questions during loan 
application procedures — where no 
record keeping is really involved — is 
best handled by “off-the-shelf’ soft- 
ware packages. Inexpensive floppy 
disks are being used to store canned 
programs for answering general ques- 
tions for prospective customers. You 
don’t need an expensive big computer 
for many applications in industry and 
business. 

You also don’t need a big computer 
to keep track of some small files that a 
department manager might use such as 
index cards. However, the same 
manager might consider it very useful 
to store such minor information on 
floppies if a microcomputer terminal 
were available. He might use the micro 
a few minutes a day to take care of 
“small” applications. This is happen- 

ing now and will continue as big busi- 



ness starts buying even more desk-top 
microcomputers instead of dumb ter- 
minals. 

There is the story of the manager 
who used his own home computer to 
automate a number of functions at work 
that saved time and money. Top man- 
agement was so impressed that they 
bought his home system, paid him for 
all the software and he had to go out and 
buy still another system for his home. 

As the little computer gets more 
publicity and home use this tale will be 
repeated many times in countless of- 
fices throughout the world. What a way 
to get a pay raise! You might be able to 
do the same thing with your home sys- 
tem. Program it for work functions and 
then sell the software and the machine 
to your company. They will really ap- 
preciate your talents. 

Large institutions such as colleges 
are also discovering the same kind of 
situation as described above in the 
world of big business. Students who 
use “smart” microcomputer terminals 
can switch off the big computer for 
game playing. The cost in savings for 
expensive big computer time on cam- 
pus is almost justification alone for 
never buying dumb terminals anymore. 

At one college, students are for- 
bidden from playing games because the 
central big computer time is simply too 
expensive. The home computer ter- 
minal idea would take care of the needs 
of the disgruntled students at that 
campus. Also, the students can copy all 
their programs on simple floppy disks 
instead of bulky paper print-outs and 
the schools are in a position to purchase 
all the educational software available 
for class-use. When the student wishes 
to access a language system that is not 
available on the micro, he still has the 
option of switching on-line to the big 
system where more power is available. 

Such developments will greatly en- 
hance home computer hobbyists as 
candidates for positions in industry, 
education and business as their very 
own home systems become part of the 
networks found in organizations of 

tomorrow. 
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MAN. . . HE MAKES HOPE 
IN HS OWN IVIA3E. 



E volution. The ongoing drama of the growth and devel- 
opment of man. His destiny His greatest hope. Now the 
focus of the extraordinary OMNI Special Second An- 
niversary Issue. 

Since the beginning of time, evolution has been occurring 
because of forces beyond our control or comprehension. Until 
now. Ours is the dawn of a new era. Man has begun to master 
the creation of life itself. 

. Future generations will be genetically engineered to meet 
the requirements of a changing civilization. Death and dis- 
ease may vanish. Technology language, intellect, and soci- 
ety itself will grow unrecognizably different. In the world of 
tomorrow man will grow ever closer to becoming the ultimate 
master of his fate. 



OMNI, The Magazine of Tomorrow, has assembled a stellar 
group of distinguished authors, scientists, and philosophers for 
this landmark look into "The Evolution of Man." This special 
issue is a celebration of man, the future, and the second 
anniversary of the magazine devoted to man's future, OMNI. 

With its unique combination of scientific insight, multiple- 
award-winning graphics, provocative essays, and spellbind- 
ing fiction, this issue marks the beginning of the third year of 
the publishing success story that has been called one of the 
greatest of all time. Embarking eagerly on a new year, OMNI 



will continue to evolve and to grow, always daring to soar to 
the frontiers of human imagination and scientific exploration. 

Join us on the journey to the future that we will share. Subscribe 
now to OMNI, and enjoy a subscription that will begin with 
OMNI's remarkable Second Anniversary Issue. This is your final 
chance to have OMNI delivered to your home at the current 
low rate. Don't hesitate. Tomorrow waits for no one. 

onnmi THE SECOND ANNIVERSARY 



OMNI Subscription Department 
PO. Box 908, Farmingdale, NY 11737 

Send me one year of OMNI (12 issues) at $6 off the news- 
stand price. Here's my check □ or money order □ for $18. 

Name 

Address 

City State Zip 

Print clearly please. Payment must accompany order. Rates for U.S. APO and FPQ, 
Canada and elsewhere add $6 to the U.S. subscription rate. Allow 6-8 weeks for 
delivery of first issue. Offer void after April 30. 1981 

OM2PC 



Income Statements 



T here’s nothing fascinating about 
an income statement. In times 
gone by, the income statement was 
called a “Profit and Loss’’ Statement 
or a “P and L’’ — and it was boring 
then, too. Money lenders, however, 
insist on seeing an income statement 
when a business owner requests a loan. 
The Internal Revenue Service has an 
annual Income Statement habit too. 
(For single owner businesses it’s 
Schedule C of Form 1040; partnerships 
use Form 1065; and corporations use 
IRS Form 1 120 to report income.) 

The income statement is a summary 
of the dollars and cents operations for a 
business. It is a standardized format for 
reporting the money received and spent 
by a business where the famous “bot- 
tom line’’ is the profit or loss. Income 
statements always cover some time 
period, with the more common time 
chunks being three months (“Quarterly 
Statement”) and one year (“Annual 
Statement”). Small businesses can 
generally satisfy the demands of taxing 
and regulatory agencies with one an- 
nual statement. However, there are no 
rules that say you can’t prepare the 
statement more often, and I usually 
prepare monthly statements for my 
client businesses. Strangely, profits 
usually increase when a business owner 
pays attention to the regular Income 
Statement. (I said the statement is 
boring , not useless ). 

I prepare a lot of these boring state- 
ments each year. Since my personal 
computer is the best tool available to 

Mr. Goldsmith , an aerospace engi- 
neer , is enrolled to practice before the 
Internal Revenue Service and is an 
active member of the National Society 
of Public Accountants. His previous PC 
articles include “Rental Income ' ( July 
1980), “ Installment Sales' ( August 
1980) and “ Reminder Lists' 

( September 1980). 



— BY W.B. GOLDSMITH, JR. — 

relieve me of boring tasks, I wrote 
“Income Statement”. With this pro- 
gram, the boredom has gone from 
preparing Income Statements. 

“Income Statement” can help your 
“binary buddy” serve you better if you 
ever need to prepare income state- 
ments. Whether you make up a report 
for your own business, for someone 
else’s or for your family budget, this 
program will save you time and 
trouble. Don’t ignore this jewel just 
because you don’t own a business. 
Smart business owners use their 
income statements to control and 
manage business costs — you can do 
the same thing for your family fi- 
nances. With a slight change or two in 
the program, your personal computer 
can help you lick inflation. 

User’s Notes 

As you can see from the Sample 
Run, this is an easy program to use. 
Once you type RUN, the program takes 
charge of asking for income and ex- 
pense data. If you are familiar with the 
IRS’s Schedule C, you’ll recognize the 
program output. All of the categories of 
expense that are used on Schedule C are 
present in “Income Statement.” (Well, 
almost. I omitted “Jobs Credit” and 
“WIN” credits because none of my 
clients with small businesses have 
employees.) The input prompts list all 
the possible expense categories. Any 
category answered with a zero (“0”) is 
dropped from the printout to give you a 
more readable statement. 

Two areas of operation beg a little 
special attention. The “Business 
Name” prompt will allow a two line 
business name entry. Enter the first 
line, then a comma (“,”), then the 
second line. At output time, the second 
line will be centered below the first. If 
your business name needs only one 
line, the program skips the centering 
and printing routine for the second. 



In the “Other Expenses” category, 
the program has provisions for ten 
entries. (See the Programming Notes to 
expand this field.) For each entry, you 
should type a few-word category title, 
then a comma (“,”) and the expense 
amount. If you have fewer than ten 
“Other Expenses”, just type anything 
for the last category and a zero (“0”) 
for the amount. The prompting 
sequence will stop and, at printing 
time, only the “live” categories will be 
listed on your Income Statement. Both 
the two-line business name entry and 
the “Other Expenses” sequence are il- 
lustrated in the Sample Run. 

When you’ve finished data entry, 
“Income Statement” asks what output 
device you’d like to use. When you 
select the output, the program asks you 
to “Press ‘RETURN’ to print” to allow 
you one last chance to energize your 
system printer and position the paper 
before the print routine begins. After 
each copy of your Income Statement is 
printed, you’ll be asked if you want 
“Another Copy?” A “Yes” will put 
you in business for another output 
sequence. (Since my system printer is 
an aged TTY that produces one copy at 
a time, I need this feature for multiple 
copies.) 

There it is. Like magic, your per- 
sonal computer is turning out pro- 
fessional Income Statements. 

Programming Notes 

There are fewer than 170 lines of 
code in the Program Listing for “In- 
come Statement”. Don’t be put off by 
the number — this is a deceptively 
powerful routine. You’ll be well repaid 
for the few minutes spent typing these 
commands into your program memory. 
The Basic is SWTP 8K Version 2.0. 
Most other Basic’s with string variables 
and matrix arithmetic capability should 
handle “Income Statement” readily. I 
used a couple of shortcuts that might 
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Sample Run 



BUSINESS NAME? E.D. SAMPLE, RETAI L 
STATEMENT DATE? 31 DECEMBER 1980 

GROSS RECEIPTS? 2513* 

RETURNS? 12 

BEGINNING INVENTORY? 18512 
PURCHASES? 8672 
PERSONAL USE WITHDRAWALS? 0 
COST OF LABOR? 0 
MATERIALS AND SUPPLIES? 1* 

OTHER COSTS? 0 

ENDING INVENTORY? 18103 

OTHER INCOME? 133 

LIST THE EXPENSES FOR: 
ADVERTISING? 1534 
AMORTIZATION? 0 
BAD DEBTS? 0 
BANK CHARGES? 84 
CAR/TRUCK EXPENSE? 1522 
COMMISSIONS? 0 
DEPLETION? 0 
DEPRECIATION? 2213 
DUES/PUBLICATIONS? 155 
EMPLOYEE BENEFITS? 0 
FREIGHT? 0 
INSURANCE? 289 
INTEREST? 0 
LAUNDRY/CLEANING? 0 
LEGAL/PROFESSIONAL? *50 
OFFICE SUPPLIES? 655 
PENSION PUNS? 0 
POSTAGE? 150 
RENT? 1800 
REPAIRS? 0 
SUPPLIES? 319 
TAXES? 586 
TELEPHONE? 144 
TRAVEL/ENTERTAINMENT? 0 
UTILITIES? 137 
WAGES? 0 

OTHER EXPENSES: 

EXPENSE TYPE AMOUNT 
? MISCELUNEOUS, 113 
? ,0 

WHAT PORT FOR OUTPUT? 3 
PRESS 'RETURN* TO PRINT? 



appear puzzling at first glance, but 
we’ll explore them fully here. 

The first fourteen lines of our pro- 
gram (lines 10 through 140) are the title 
block and definition statements. Line 
80 gives our program full control of the 
output format by defeating an auto- 
matic CR-LF sequence in the SWTP 
Basic. The DIGITS =2 in line 90 speci- 
fies that two digits are to be printed 
after the decimal point for all numerics. 
Your Basic may have different com- 
mands to accomplish these goals, so 
feed your machine its favorite grammar. 

The function definition statements in 
lines 100 to 130 simplify the TAB argu- 
ments used later in the print section. 
The entire semi-elaborate TAB compu- 
tations insure that the decimal points 
line up in the output. Again, your Basic 
may have a different method for print- 
ing right-justified columns of numbers. 

Statement 140 dimensions the main 
matrix variable, E(X), and asks the 
computer to reseve the appropriate 
amount of memory. The Basic in my 



Sample Income Statement 

STOrtE INCOME STATEMENT 



l.D.SaM/'LE 
RETAIL BTOnE 

PERIOD ENDING Si DECEMBER 1980 



GROSS RECEIPTS 

LESS RETURNS AND ALLOWANCES 

BALANCE 

BEGINNING INVENTORY 
PURCHASES 

MATERIALS AND SUPPLIES 

SUB TOTAL 
ENDING INVENTORY 

COST OF GOODS SOLD 

GROSS INCOME 
OTHER INCOME 

TOTAL INCOME 



EXPENSES 
ADVERTISING 
BANK CHARGES 
CAR/TRUCK EXPENSE 
DEPRECIATION 
DUES/PUB LI CATIONS 
INSURANCE 

LEGAL/PROFESSIONAL 
OFFICE SUPPLIES 
POSTAGE 
RENT 

SUPPLIES 

TAXES 

TELEPHONE 

UTILITIES 

MISCELUNEOUS 

TOTAL EXPENSES 

NET PROFIT FOR PERIOD 



$ 25132.00 

12.00 



$ 25120.00 

S 18512.00 

8672.00 

12.00 



S 27196.00 

18103.00 



9093.00 



$ 16027 .00 

133.00 



$ 16160.00 



$ 1534.00 

84.00 

1522.00 

2213.00 

155.00 

289.00 

250.00 

655.00 

150.00 

1600.00 

319.00 

586.00 

144.00 

137.00 

113.00 



9951 .00 



$ 6209.00 



personal computer defaults all undi- 
mensioned matrices to a size of ten. 
(Anything larger must be dimensioned 
to avoid an error message; anything 
smaller may be dimensioned to save 
memory.) Since the “Other Expense” 
variables, E$(X) and F(X), use a ten- 
slot matrix, they are not dimensioned 
here. If you decide to expand the 
“Other Expense” category you may 
need to add dimension information for 
the expense name and amount variables. 

After lines 150 through 180 tell you 
what program is running, the serious 
business of “Income Statement” data 
collecting begins. Lines 200 and 210 
allow entry of the business name and 
the date of the statement (last day of the 
accounting period reported). Two vari- 
ables are used in line 200 to permit 
input of a two-line business name. (See 
the Sample Run for an example.) One 
label is used for the statement date, so 
don’t put a commas (“,”) anywhere in 
the date — the comma is a terminator 
for a variable. 



Gross income and inventory figures 
are input in lines 240 through 340. 
Some of the variables are added and 
some subtracted later when we get to 
the mathematical part of our statement, 
so if you decide to leave any of these 
variables out, retain the proper variable 
tag. 

Expense information is entered in 
statements 360 to 490. There are two 
separate collection routines — one for 
“regular” expenses and one for the 
“other” business costs. Both use a 
FOR/NEXT loop structure, for regular 
expenses, the titles for the expense 
categories are stored in the DATA 
statements of lines 2000 to 2080. As 
each lap through the loop is run, the 
READ E$ in line 380 picks up another 
title. The expense amount entiy is 
stored in the E(X) matrix. For other 
expenses, we can’t read the names of 
the expenses so provision is made to 
store these in matrix F(X). Lines 430 
and 440 provide an operator cue to the 
proper entry order. Statement 470 
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Program Listing 



0010 REM ******************************** 

0020 REM * INCOME STATEMENT * 

0030 REM ******************************** 

0040 REM * COPYRIGHT 198U BY: * 

0050 REM * W. B. GOLDSMITH, Jn. * 

0060 REM * LAKEWOOD, CA 9U7 U * 

0070 REM ******************************** 

0080 LI NE= 0 
0090 DIGITS: 2 

0100 DEF FNA ( X) =(50-LEN(STRS(X) ) ) 

0110 DEF FNB(X):(66-LEN(STRS(X))) 

0120 DEF FNC(X):(64-LEN(STRS(X))) 

0130 DEF FND(X) :(48-LEN(STRS( X) ) ) 

0140 DIM E(26) 

0150 PRINT 

0160 PRINT "INCOME STATEMENT" 

0170 PRINT 
0180 PRINT 

0190 REM ** HEADER INFORMATION ******************** 
0200 INPUT "BUSINESS NA ME" , N$, M$ 

0210 INPUT "STATEMENT DA TE* , DS 
0220 PRINT 

0230 REM ** INCOME INFORMATION ********************* 
0240 INPUT "GROSS RECEIPTS" , I ( 1 ) 

0250 INPUT "RETURNS", 1(2) 

0260 INPUT "BEGINNING I NVENTORY" ,1(3) 

0270 INPUT "PURCHASES", I (4) 

0280 INPUT "PERSONAL USE WI THDRAWALS" ,1(5) 

0290 INPUT "COST OF LABOR", I (6) 

0300 INPUT "MATERIALS AND SUPP LI ES" , I (7 ) 

0310 INPUT "OTHER COSTS", I (8) 

0320 INPUT "ENDING I NVENTORY" ,1(9) 

0330 INPUT "OTHER I NCOME" ,1(10) 

0340 PRINT 

0350 REM ** COLLECT THE EXPENSES ****************** 
0360 PRINT "LIST THE EXPENSES FOR:’’ 

0370 FOR X = 1 TO 26 
0380 READ ES 
0390 PRINT ES; 

0400 INPUT E(X) 

0410 NEXT X 
0420 PRINT 

0430 PRINT "OTHER EXPENSES:" 

0440 PRINT TAB(5) ;" EXPENSE TYPE' ;1AB(20) ;"A MOUNT" 
0450 FOR X=1 TO 10 
0460 INPUT ES ( X) , F ( X) 

0470 IF F ( X) =0 THEN X=10 
0480 NEXT X 
0490 PRINT 

0500 REM ** SELECT OUTPUT PORT ******************** 
0510 INPUT "WHAT PORT FOR OUTPUT" ,P 
0520 INPUT "PRESS ’RETURN’ TO PRINT, Z$ 

0530 PORT= p 

0540 REM ** PRINT THE INCOME STATEMENT ************ 
0550 PRINT 

0560 PRINT TAB(28) ;" I NCOME STATEMENT 
0570 PRINT 

0580 PRINT TAB(INT((72-LEN( Ni ))/£)) ;NS 
0590 IF MS:"" THEN 610 
0600 PRINT TAB(INT((72-LEN(M$))/2)) ;MS 
0610 PRINT 

0620 PRINT TAB( I NT( (58-LEN( D$) )/£) ) ;’* PERIOD ENDING 
” JDS 
0630 PRINT 
0640 PRINT 
0650 PRINT 

0660 REM ** RECEIPTS <6 INVENTORY ****************** 
0670 PRINT "GROSS RECEIPTS"; 

0680 PRINT TAB( FNC (1(1))) ;"$ ”;I(1) 

0690 PRINT "LESS RETURNS AND ALLOwA NC EiT ; 

0700 PRINT TAB(FNB(I(2))) ;I(2) 

0710 PRINT TAB (56) ;’’ " 

0720 I1:I(1)-I(2) 

0730 PRINT "BALANCED; 

0740 PRINT TAB(FNC(I1)) J"S ”;I1 
0750 PRINT "BEGINNING INVENTORY"; 

0760 PRINT TAB(FND(I(3))) ;"S ";I(3) 

0770 PRINT "PURCHASES"; 

0780 PRINT TAB(FNA(I(4))) 5 1 (4) 

0790 IF 1(5) =0 THEN 820 

0800 PRINT "LESS COST OF PERSONAL WI THDkhWA LS" ; 

0810 PRINT TAB(FND(I(5))) ;" (’* ; I ( 5) ;" ) ’* 

0820 IF 1(6) =0 THEN 850 



0830 PRINT "COST OF LABOR”; 

0840 PRINT TAB(FNA(I(6))) ;I(6) 

0850 IF 1(7) :0 THEN 880 

0860 PRINT " MA TERIALS AND SUPPLIES"; 

0870 PRINT TAB(FNA(I(7))) ;I(7) 

0850 IF 1(8) :Q THEN 910 
0890 PRINT "OTHER COSTS"; 

0900 PRINT TAB( FNA( I ( 8) ) ) ;I(8) 

0910 I2:I(3)+I(4)-I(5)+I(6)+I(7)+I(B) 

0920 PRINT TAB ( 40 ) ;’’ " 

0930 PRINT "SUBTOTAL" ; 

0940 PRINT TAB( FND( 12 ) ) ;"S ";I2 
0950 PRINT "ENDING INVENTORY"; 

0960 PRINT TAB(FNA(I(9))) ;I(9) 

0970 PRINT TAB ( 40) ;" " 

0980 13:12-1(9) 

0990 PRINT "COST OF GOODS SOLD"; 

1000 PRINT TAB( FNB( 13 ) ) ; 13 

1010 PRINT TAB(56) ;’’ ” 

1020 14:11-13 

1030 IF 1(10) :0 THEN 1090 

1040 PRINT "GROSS I NCOME* ; 

1050 PRINT TAB( FNC( 14) ) ;"S ";I4 
1060 PRINT "OTHER INCOME"; 

1070 PRINT TAB(FNB(I(10))) ;I(10) 

1080 PRINT TAB (56) ;" " 

1090 1:14+1(10) 

1100 PRINT "TOTAL INCOME"; 

1110 PRINT TAB(FNC(I)) ;"S ";I 
1120 PRINT 

1130 PRINT TAB(5) ;" EXPENSES" 

1140 REM** EXPENSES ****************************** 
1150 RESTORE : REM ** RESET THE DATh POINTER ****** 
1160 Z=0: REM ** SET FLAG FOR "$’* PRINTING ******* 

1170 £=0 

1180 FOR X:1 TO 26 
1190 READ ES 

1200 IF E( X) =0 THEN 1280 
1210 E=E+E(X) 

1220 PRINT ES; 

1230 IF Z»0 THEN 1270 

1240 PRINT TAB( FND( E( X) ) ) ;"$ ”;E(a) 

1250 Z=Z+l 
1260 GOTO 1280 

1270 PRINT TAB( FNA( E( X) ) ) ; E( X) 

1280 NEXT X 
1290 FOR X:1 TO 10 
1300 E:E+F(X) 

1310 IF F(X):0 THEN 1340 
1320 PRINT £$( X) ; 

1330 PRINT TAB( FNA( F( X) ) ) }F(X) 

1340 NEXT X 

1350 PRINT TAB(40);" " 

1360 PRINT "TOTAL EXPENSES"; 

1370 PRINT TAB( FNB( D) ;E 

1380 PRINT TAB(56) ;" ” 

1390 B : I - E 

1400 IF ABS(B):B THEN 1530 
1410 B=ABS(B) 

1420 PRINT 

1430 PRINT "NET LOSS FOR PERIOD"; 

1440 PRINT TAB(FNC(B)) ;"S(" ;B;")" 

1450 PRINT TAB(56) 

1460 PRINT CHR$( 12) : REM ** FORM FEED TO TTY ****** 
1490 PORT: l 

1500 INPUT "ANOTHER COPY*',ZS 
1510 IF LEFTS (ZS 1 1 ) :" Y" THEN 520 
1520 END 

1530 PRINT "NET PROFIT FOR PERIOD"; 

1540 PRINT TAB( FNC (B) ) ;’’ $ " ;B 
1550 GOTO 1450 

2000 DATA "ADVERTISING", "AMORTIZATION", "BAD DEBTS" 
2010 DATA "BANK CHA RG ES" , " CAR/TRUC K laPENSE’ ,’’COMMISS 
IONS" 

2020 Data "DEPLETION"," DEPRECIATION", "DUEB/PUBLICATIO 
NS" 

2030 DATA "EMPLOYEE BENEFI TS" , "FREIGHT" ," INSURANCE’ 
2040 DATA " I NTEREST* ," LA UNDRY/C LEaNI NC" ," LEGAL/PROFES 
SIONAL" 

2050 DATA "OFFICE SUPPLI ES" ,’’ PENSION P La Ns" ," POs TAG E’ 
2060 DATA " RENT" , "REPAIRS" ," SUPPLI ES” 

2070 DATA " TAXES" ," TELEPHONE* ," TRaVEL/ ENTEkTA I NMENT" 
2080 DATA "UTILITIES", "WAGES" 
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provides for early termination of the 
FOR/NEXT loop when you run out of 
expenses before the program runs out 
of NEXTs. To increase the possible 
number of categories, change the FOR 
X= 1 TO 10 to accommodate the number 
of expenses you expect and redimen- 
sion E$(X) and F(X) as mentioned. 

Lines 500 to 530 allow run-time 
selection of the output device and the 
“one-more-chance” to energize the 
printer. If your printer and your control 
terminal are the same, you can delete 
these lines with no ill effects on 
“Income Statement.” 

Lines 540 and 650 enclose the rou- 
tine that provides the header for your 
output statement. The TAB functions 
in 580, 600 and 620 center the mes- 
sages on my 72-column TTY. If your 
printer has a different column count, 
you’ll want to change these. You may 
also want to change the functions 
defined in 100 to 130 to provide a more 
balanced looking statement. Statement 
590 guides the program flow around the 
print of the second line in the business 
name if there is no second line. If you 
don’t mind an extra line space or two on 
your statement you could delete 590. 

Printing and calculation of the re- 
ceipts and inventory data is inter- 
spersed from line 660 to 1120. The 
arithmetic is pretty straightforward 
here. Since I wanted all income section 
variables to carry an “I” tag, things 
may be a little confusing. As you trace 
through this area, remember that 
“1(1)” is a different item than “II”. 
The functions we defined in the pro- 
gram preamble are used in the TABs for 
the first time here. Use of the functions 
really cuts down the time and error 
opportunities of keypunching. 

Expenses are calculated and printed 
next. The RESTORE of line 1 150 resets 
the Basic data pointer so we can use the 
list of expense names in line 2000. 
to 2080 again. Line 1 160 carries a reset 
for a flag that causes the “$” to be 
printed only before the first numerical 
entry in the column. 1170 initializes 
“E” which will be used to collect the 
expense total. The FOR/NEXT of lines 
1 180 to 1280 does the work of printing 
the non-zero expense categories and 
amounts. Statement 1200 takes care of 
suppressing those expenses titles with 
zero costs entered. The first time that 
any expense is printed, Z=0 and line 
1240 will cause the “$” to precede the 
cost amount. Line 1250 increments Z to 
insure that the next time through the 
loop 1270 handles the printing chores. 
It takes a few extra commands just to 
put that dollar sign in its proper place 



once. The extra trouble is repaid by the 
professional appearance given to your 
income statement by that touch. Line 
1210 is used to collect the total ex- 
penses in variable “E”. 

Other expenses are printed in the 
same column by 1290 to 1340. Again, a 
FOR/NEXT cycles through the matrix 
variables. Line 1300 continues to 
amass expense totals and 1310 lets our 
program suppress the zeroes. 

The “B” (for Bottom Line) in line 
1390 is our profit or loss number. If the 
business shows a profit for the period, 
line 1400 sends program execution to 
the “NEXT PROFIT FOR PERIOD” 
printing command. If we had a loss, 
lines 1410 through 1440 take care of 
tagging and printing. The “B=ABS(B)” 
of line 1410 gets rid of the minus sign 
attached to the loss. Accountants are 
used to seeing losses enclosed by 
brackets or parentheses (because car- 
bon paper doesn’t know whether you’re 
writing with a red pen or a black one — 
and a minus sign could be a “dash” or 
fly speck). The printing statement in 
1440 takes care of the brackets for our 
business loss. 

CHR$(12) in statement 1460 pro- 
vides a form feed to my TTY to ready 
the printer for another statement. 
Check your printer’s instructions to 
verify that it will recognize one of these 
before trying to print it. (If yours is a 
really off-beat printer CHR$(12) might 
be a self-destruct signal.) PORT=l in 
line 1490 is another command for 
SWTP systems. The control terminal is 
located at Port #1 and by returning 
control we can have the “Another 
Copy?” question printed on the video 
terminal instead of the client’s income 
statement. You may wish to change 
THEN 520 in statement 1510 to THEN 
510 to allow selection of different out- 
put devices on each output run. (You 
could let the first print sequence display 
on your video terminal, for example, to 
check that data entry was complete 
before printing.) 

Whether you prepare income state- 
ments for your own business, for your 
family or as a business, “Income 
Statement” can take the routine work 
out of your task. It will provide a uni- 
form format for your accounting state- 
ments that will help brand your product 
“professional. ” You can customize the 
program to add a signature block at the 
bottom of the page, a letterhead at the 
top or a different mix of expenses in the 
middle. If this program does no more 
than take some of the mystery out of the 
business bookkeeping jargon, it’s 
worth adding to your program library .□ 
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Computer- Assisted Grading 



N o matter how test grades are 
assigned, someone will be un- 
happy. One problem teachers face is 
that there are two completely different 
approaches to determining the grades 
for an exam. Grades are either based on 
performance against an absolute stan- 
dard (90% or above is an A) or by 
relative performance within a group 
(the three highest scores will be As). If 
the teacher uses the “absolute” 
approach, the fairness of the standard is 
always in question. If the “relative” 
approach is chosen, an excellent grade 
may be awarded for mediocre perform- 
ance in a sub-normal class. 

Most teachers would like to use a 
combination of the two approaches but 
find the computations involved in the 
relative or “curve” method both time- 
consuming and boring. Here’s where 
your computer can be of great help. 
Once the test scores are entered, the 
computer can quickly do the statistical 
calculations and suggest grades based 
on both approaches. 

This grading program was developed 
to assist a teacher in determining letter 
grades for a set of papers. Three basic 
assumptions underly the program’s 
design. First, both absolute perform- 
ance and relative performance need to 
be considered. Second, the process of 
assigning grades is actually an iterative 
process. That is, the teacher will try 
various “cut-off limits” to obtain a 
good grade distribution. Third, the 
teacher should have the final say in 
what the grades will be. A good grade 
distribution is one that satisfies the 
teacher, not one that meets some 
abstract mathematical test. 

The program begins by gathering 
some title information, the class size 
and the number of questions on the test. 
Next, the students’ scores are input. As 
each score is entered, it is edited and an 
“absolute” grade determined immedi- 
ately. When a score of zero is entered, 
you are asked if all scores have been 
input. If so, the program provides you 
with the opportunity to review and re- 
vise the entries. Once you are satisfied 
that the scores are correct, the program 
calculates the mean and standard devia- 
tion for the input data and assigns 



BY REGINALD D. GATES — 

grades as follows (see also Figure 1): 

• Any grade >= (mean + 2 stan- 
dard deviations) = A 

• Any grade >= (mean + 1 stan- 
dard deviation) = B 

• Any grade >= (mean — 1 stan- 
dard deviation) = C 

• Any grade >= (mean - 2 stan- 
dard deviations) = D 

• Any grade < (mean — 2 standard 
deviations) = F 

Now the iterative process begins. 
You are shown a graph displaying the 
distribution of scores on a percentage 
right basis from 100% to 35%. In the 



upper right comer of the graph the 
number of students receiving each 
grade under both approaches is shown. 
In the lower right hand comer is dis- 
played the “cut-off limits” used in both 
approaches. 

Now review the graphs and displays. 
The program asks if you are ready to 
assign grades or if you wish to change 
the limits. If you elect to change the 
cut-off points for the grades, the pro- 
gram obtains the new data, recalculates 
the grades and redisplays the graph. 

Once you are happy with the distri- 
bution of grades, the program cycles 



The Normal Distribution Curve 




Figure 1 



Scores 



Assume we graph the number of 
students achieving a given score versus 
the scores themselves. If we have a 
perfectly designed test and an abso- 
lutely normal class, the resulting graph 
will be the “bell-shaped” curve above. 
This figure can be completely de- 
scribed with only two mathematical 
values, the mean and the standard 
deviation. 

The mean for a set of scores is simply 
the average. The standard deviation is a 
measure of the dispersion of scores 
about the mean. It tells us how the 
scores are distributed with respect to 
the average. The standard deviation is 
calculated as follows: 



SD 



-/ 



Z(x-mr 
n 



SD = Standard Deviation 
x = score 
m = mean 

n = number of scores 
2 = “the sum of” 

It can be shown mathematically that 
67% of the area under the curve is with- 
in plus or minus one SD of the mean 
and that 94% is within plus or minus 
two SDs. If we use these points as the 
dividing lines for our grading, then 3% 
of the students will fail and 3% will 
get As. 



28 Personal Computing October i 98 o 



through the scores as input. The score is 
displayed along with the suggested 
grade for each entry. The program 
waits after each display so the grade 
may be written on the test papers. 

This program does not replace the 
teacher or the teacher’s judgment. It 
does relieve some of the tedious work 
so additional time is available for the 
more important aspects of teaching. 



Program Notes 

The program is written in Digital 
Group Maxi-Basic 2.0. Where possi- 
ble, I’ve avoided commands unique to 
this implementation of Basic. How- 
ever, the following comments may be 
helpful. 

• The pound sign (#) is used as an 
abbreviation for PRINT. 



• %3I;T9 means “print the field T9 
in a formatted manner as a three-digit 
integer”. 

• The maximum class size is cur- 
rently set at fifty but may be revised as 
desired. 

• The program uses the function 
SORT to compute the square root. 

• Almost all calculations are round- 
ed to an integer result. □ 



Program Listing 



10 REM ***** GRADE 1 BY k. D. GATES ****** 

20 REM ***** VEI 1.0 

30 GOSUB 1000 : REM INIT 

40 GOSUB 2000 : REM GET SCORES 

50 GOSUB 3000 : REM ADJ AND CALCULATE 

60 REK **** LOOP UNTIL USER HAPPY WITH GRADES 

70 GOSUB 4000 : REM CALC REL GRADES 

80 GOSUB 5000 : REM PRT GRAPH 

90 INPUT "DO YOU WISH TO CHANCE LIMITS (Y/N) ",Q$ 
100 IF Q$="Y" THEN GOSUB 6000 : GOTO 60 
110 GOSUB 7000 : REM PRT GRADES 
120#"" : #".. GOODBYE ,.";FREE(0) 

199 END 

400 REM SUBR TO TEST A NUM IN LI 
405 REM L2=L0WER LIMIT ,L3=UPPER LIM, AND NUM MUST 
BE INTEGER 

410 REM L4 SET TO 1 IF ERROR 

415 IF LlOINT(Ll) THEN L4=l : GOTO 480 

420 IF L1<L2 THEN L4=2 : GOTO 480 

430 IF L1>L3 THEN L4=3 : GOTO 480 

440 L4=0 : GOTO 499 

480 #". . ERR 

482 IF L4=l THEN #" NOT AN INTEGER" 

483 IF L4=2 THEN #" LESS THAN ";L2 

484 IF L4=3 THEN #" LARGER THAN ";L3 

485 L4=l 
499 RETURN 

1000 REM INITIALIZE, ETC 
1010 DIM N3 (5) ,N4(5) 

1020 DIM G$ (5) : G$="ABCDF" 

1030 DIM G3$ (50) , G4$ (50) 

1040 DIM B$ (50) , A$ (50) 

1050 DIM T$ (25) 

1055 DIM Q$ (1) 

1060 G3?=" " : G4$=" " 

1070 B$=" " : A$="*" 

1080 T$=" " 

1090 FOR 1=1 TO 6 

1100 G3$=G3$+G3$ : G4$=G4$+G4$ 

1110 B$=BS+BS : A$=A$+A$ 

1120 T$=T$+T$ 

1130 NEXT I 

1140 DIM 11(15) , S3 (50) 

1150 DIM P3 (50) 

1200 FuR 1=1 TO 16 : #"" : NEXT I 

1220 |" GRADE1" 

1240 FOR 1=1 TO 8 : #"" : NEXT I 
1250 #".. PLEASE SUPPLY CLASS TITLE 
1260 INPUT T$ 

1270 #"" 

1280 #".. PLEASE GIVE THE MAXIMUM POSSIBLE SCORE 
10 Pv THE TEST"; 

1290 INPUT N2 

1300 L1=N2 : L2=l :L3=9999 : GOSUB 400 
1310 #".. MAXIMUM NUMBER OF SCORES = 50" 

1320 #"" 

1330 REM SET PERCENT LIMITS 90=A, 80=B,70=C, ETC 
1340 PI (1)=90 : PI (2) = 80 : PI (3)=70 
1350 PI (4)=60 : Pl(5)=50 
1399 RETURN 

2000 REM GET SCORES FROM USER 

2010 #" . . PLEASE INPUT SCORES AS NUMBER RIGHT " 

: #"" 

2020 L2=0 : L3=2 



2030 E1=0 
2035 N1=N1+1 

2040 REM *** LOOP UNTIL END FLAG Is ON 

2050 #" PAPER NO "JJ1;" SCORE 

2060 INPUT 1 LI 

2070 GOSUB 400 

2080 IF L4=l THEN 2050 

2090 IF L1=0 THEN GOSUB 2200 ELSE GOSUB 2400 
2100 IF E1=0 THEN N1=N1+1 : GOTO 2040 
2110 #" . . " ; N1 ; " SCORES INPUT" 

2199 RETURN 

2200 REM TEST FOR END OF SCORES 
2205 #"" 

2210 INPUT "ALL SCORES ENTERED (Y/N)",Q$ 

2220 IF Q$="Y" THEN El=l : N1=N1-1 : GOTO 2299 
2230 GOSUB 2400 : REM STORE 0 SCORE 
2299 RETURN 

2400 REM FOUND A GOOD SCORE ,NOW TO STORE IT 

2410 33 (N1)=L1 

2420 T9=INT(100* (L1/N2)) 

2430 P3(N1)=T9 
2435 T8=0 

2440 FOR 1=5 TO 1 STEP -1 
2450 IF T9>=P1(I) THEN T8=I 
2460 NEXT I 
2465 IF T8=0 THEN T8=5 

2470 G3$(N1,N1)=G$(T8 ,T8) : REM LETTER GRADE FOR 
PER 

2490 #" - PER " ;7.3I ; T9 = GRADE ";G$(T8,T8) 

2495 N3(T8)=N3(T8)+1 
2499 RETURN 

3000 REM ADJUST SCORES IF DESIRED AND CALC MEAN, 
SD 

3010 #"" : INPUT "DO YOU WISH TO REVIEW THE 
SCORES (//N)",si$ 

3020 IF Q$="Y" THEN GOoUB 3600 

3030 REM CALC oCORE PER INTERVAL, TOTAL SCORE 

3035 T9=Q 

3040 FOR 1=1 TO N1 
3050 T1=T1+S3(I) 

3060 T9=21-INT(P3(I)/5) 

3070 IF T9> 15 THEN T9=15 
3080 I1(T9)=I1(T9)+1 

3090 NEXT I 

3100 REM CALC MEAN , S D AND LIMITS FOR SCORES 
3110 T9=0 

3120 A1=INT( (T1/N1)+. 5) 

3130 FOR 1=1 TO N1 

3140 T9=(S3 (I) -A1)*(S3 (I)-Al) + T9 

3150 NEXT I 

3160 A2=INT(SQRT(T9/Nl)+.5) 

3170 L5 (1)=A1+2*A2 
3180 L5(2)=A1+1*A2 
3190 L5(3)=A1-A2 
3200 L5(4)=A1-2*a2 
3210 L5(5)=0 
3220 FOR 1=1 TO 5 

3230 P4(I)=INT(100*(L5(I)/N2)) : NEXT I 

3299 RETURN 

3600 FOR Xl=l TO N1 

3610 #"PAPER "j%3I;Xl;" SCORE " ;%3I; S3 (XI) ; 

3620 #" - IS THIS RIGHT (Y/N) "; : INPUT Q$ 

3625 IF 0$="Y" THEN 3680 

3630 #" CORRECT SCORE " ; ; INPUT LI 

3640 L2=0 : L3=N2 : GOSUB 400 

3650 IF L4=l THEN 3630 

3660 N9=N1 : N1=X1 : GoSUB 2400 

3670 N1=N9 

3680 NEXT XI 

continued 
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GOTO 519 9 



GOTO 5599 
GOTO 5599 
Nl; : GOTO 5599 
INT(100*(A2/N2)) 



GOTO 5599 



3699 RETURN 

4000 REM CALC CURVE GRADES BASED ON L5 LIMITS 
4020 FuR Xl=l TO Nl 
4030 GObUB 4400 

4040 G4$(X1,X1)=G$(T9,T9) 

4050 N4(T9)=N4(T9)+1 

4060 NEXT XI 

4099 RETURN 
4400 T9=0 

4410 FOR 1=5 TO 1 STEP -1 
4420 IF S3 (X1)>=L5 (I) THEN T9=I 
4430 NEXT I 

4440 IF T9=0 THEN T9=5 
4499 RETURN 
5000 FOR Xl=l TO 15 
5010 GOSUB 5100 

5020 GOSUB 5200 

5030 GOSUB 5500 

5040 #"" 

5050 NEXT XI 

5099 RETURN 

5100 REM PRT LINE HEADING 
5110 IF Xl=l THEN #"100" 5 
5120 #%3I; (100-5*(X1-1)); 

5199 #" "; : RETURN 

5200 REM PRT ASTERISKS BASED ON INTERVAL COUNT 
5210 T9=50-I1 (XI) 

5220 IF I1(X1)>0 THEN #A$ (1 ,11 (XI)) ; 

5230 IF T9>0 THEN #B$(1,T9); 

5240 #" "; 

5299 RETURN 

5500 REM PRT RIGHT HAND PORTION 
5510 IF XI- 1 THEN #" ABS REL"; 

5520 IF XI* 7 THEN #" LIM LIP?’; 

5525 IF XI* 13 THEN #" NO ";%3I 

5526 IF XI* 14 THEN #" SD ";%3I; 

; : GOTO 5599 

5527 IF Xl=15 THEN #" AVG " ; %3I ; INT (100*(A1/N2) ) 
; : GOTO 5599 

5530 IF Xl>7 THEN GOSUB 5700 
5540 REM PRT TOP PORTION 
5550 T8=X1-1 

5560 #G$ (T8 , T8 ) ; %3I ; N3 (T8) ; 

5570 #" " ;%3I; N4 (T8) ; 

5599 RETURN 

5700 REM PRT BOTTOM PORTION 
5710 T8=Xl-7 
5720 #G$(T8,T8); 

5730 #%3I;P1(T8) ;" 

5740 #%3I;P4(T8); 

5799 RETURN 

6000 REM CHANGE REL GRADING LIMITS 
6010 #"" 

6020 FOR 1=1 TO 5 

6030 #" GRADE " ; G$ (I, I) ; " OLD LIMIT 
6040 #%3I;P4(I); 

6050 #" - NEW LIMIT " ; 

6060 INPUT LI 

6070 IF I>1 THEN L3*L5(I-1) ELSE L3=100 
6080 GOSUB 400 
6090 IF L4=l THEN 6050 
6100 P4(I)*L1 

6120 L5(I)-INT((N2*(Ll/100))+.5) 

6130 NEXT I 

6140 REM RESET NO OF GRADES FOR REL 
6150 FOR 1=1 TO 5 
6160 N4(I)=0 : NEXT I 

6199 RETURN 
6300 P4(I)=L1 

6310 L5(I)*INT((N2*(Ll/100)+.5) 

6399 RETURN 
7000 #"" : #"" 

7010 FOR Xl=l TO Nl 
7020 #" NO ";%3I;X1; 

7030 #" SCORE ";%3I;S3(X1); 

7040 #" PER " ;%3I ;P3 (XI) ; 

7050 #" "; 

7060 #" SUGGESTED GRADE (ABS) " ;G3$ (XI ,X1) ; 

7070 #" (REL) ";G4$(X1,X1) 

7080 #"" 

7090 INPUT "HIT CR WHEN READY ",Q$ 

7100 NEXT XI 
7199 RETURN 
READY 



Sample Rim 



GRADE 1 



. . PLEASE SUPPLY CLASS TITLE ?TEST CLASS 1 

. PLEASE GIVE THE MAXIMUM POSSIBLE SCORE FOR 
THE TEST7100 

MAXIMUM NUMBER OF SCORES = 50 
.. PLEASE INPUT SCORES AS NUMBER RIGHT 



PAPER 


NO 


1 SCORE ?70 - PER 


70 = 


GRADE C 


PAPER 


NO 


2 SCORE ? 78 - PET 


78 = 


GRADE C 


PAPER 


NO 


3 SCORE ? 95 - PEI 


95 * 


GRADE A 


PAPER 


NO 


4 SCORE ? 87 - PER 


87 = 


GRADE B 


PAPE F 


NO 


5 SCORE ?44 - PER 


44 = 


GRADE F 


PAPER 


NO 


6 SCORE ? 67 - PER 


67 = 


GRADE D 


PAPER 


NO 


7 SCORE 111 - PER 


72 = 


GRADE C 


PAPER 


NO 


8 SCORE ?60 - PEI 


60 = 


GRADE D 


PAPER 


NO 


9 SCORE ?97 - PER 


97 = 


GRADE A 


PAPER 


NO 


10 SCORE ? 7 5 - PER 


75 


= GRADE C 


PAPER 


NO 


11 SCORE ?88 - PER 


88 


= GRADE B 


PAPER 


NO 


12 SCORE ? 55 - PER 


55 


= GRADE F 


PAPER 


NO 


13 SCORE ?71 - PER 


71 


= GRADE C 


PAPER 


NO 


14 SCORE ? 83 - PER 


83 


= GRADE B 


PAPER 


NO 


15 SCORE ? 66 - PER 


66 


= GRADE D 


PAPER 


NO 


25 SCORE ?71 - PER 


71 


= GRADE C 


PAPER 


NO 


26 SCORE ?52 - PER 


52 


= GRADE F 


PAPER 


NO 


27 SCORE ?82 - PER 


82 


= GRADE B 


PAPER 


NO 


28 SCORE ?73 - PER 


73 


= GRADE C 


PAPER 


NO 


29 SCORE ?90 - PER 


90 


= GRADE A 


PAPER 


NO 


30 SCORE ? 74 - PER 


74 


= GRADE C 


PAPER 


NO 


31 SCORE ?0 







ALL SCORES ENTERED (Y/N)Y 
.. 30 SCORES INPUT 



DO YOU WISH TO REVIEW THE SCORES (Y/N)N 
100 



60 

55 

50 

45 

40 

35 

30 





ABS 


REL 


** 


A 5 


0 


•kirk 


B 6 


6 


kk 


C 11 


19 


kkkk 


D 4 


4 


kkkk 


F 4 


1 


kkkkkkk 


LIM 


LIM 


kkk 


A 90 


101 


k 


B 80 


88 


kk 


C 70 


62 


k 


D 60 


49 




F 50 


0 


k 


NO 


30 




SD 


13 




AVG 


75 



DO YOU 


WISH TO CHANGE LIMITS (Y/N) Y 




GRADE 


A 


OLD 


LIMIT 


101 


- NEW 


LIMIT 


? 95 


GRADE 


B 


OLD 


limit 


88 


- NEW 


LIMIT 


? 8 5 


GRADE 


C 


OLD 


limit 


62 


- NEW 


LIMIT 


? 7 0 


GRADE 


D 


OLD 


limit 


49 


- NEW 


LIMIT 


? 55 


GRADE 


F 


OLD 


limit 


0 


- NEW 


LIMIT 


? 50 



100 




ABS 


REL 


95 


kk 


A 5 


2 


90 


kkk 


B 6 


5 


85 


kk 


C 11 


15 


80 


kkkk 


D 4 


6 


75 


kkkk 


F 4 


2 


70 


kkkkkkk 


LIM 


LIM 


65 


kkk 


A 9 9 


95 


60 


k 


B 80 


85 


55 


kk 


C 70 


70 


50 


k 


D 60 


55 


45 




F 50 


50 


40 


k 


NO 


30 


35 




SD 


13 


30 




AVG 


75 



DO YOU WISH TO CHANGE LIMITS (Y/N) N 
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NO 


1 SCORE 70 


PER 


70 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


c 


HIT 

NO 


CR WHEN READY 
2 SCORE 78 


PER 


78 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


c 


HIT 

NO 


CR WHEN READY 
3 SCORE 95 


PER 


95 


SUGGESTED 


GRADE 


(ABS) 


A 


(REL) 


A 


HIT 

NO 


CR WHEN READY 
4 SCORE 87 


PER 


87 


SUGGESTED 


GRADE 


(ABS) 


B 


(REL) 


B 


HIT 

NO 


CR WHEN READY 
5 SCORE 44 


PER 


44 


SUGGESTED 


GRADE 


(ABS) 


F 


(REL) 


F 


HIT 

NO 


CR WHEN READY 
6 SCORE 67 


PER 


67 


suggested 


GRADE 


(ABS) 


D 


(REL) 


D 


HIT 

NO 


CR WHEN READY 
7 SCORE 72 


PER 


72 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
8 SCORE 60 


PER 


60 


SUGGESTED 


GRADE 


(ABS) 


D 


(REL) 


D 


HIT 

NO 


CR WHEN READY 
9 SCORE 97 


PER 


97 


SUGGESTED 


GRADE 


(ABS) 


A 


(REL) 


A 


HIT 

NO 


CR WHEN READY 
10 SCORE 75 


PER 


75 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
11 SCORE 88 


PER 


88 


SUGGESTED 


GRADE 


(ABS) 


B 


(REL) 


B 


HIT 

NO 


CR WHEN READY 
12 SCORE 55 


PER 


55 


SUGGESTED 


GRADE 


(ABS) 


F 


(REL) 


D 


HIT 

NO 


CR WHEN READY 
13 SCORE 71 


PER 


71 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
14 SCORE 83 


PER 


83 


SUGGESTED 


GRADE 


(ABS) 


B 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
15 SCORE 66 

— -r\ 


PER 


66 


SUGGESTED 


GRADE 


(ABS) 


D 


(REL) 


D 


HIT 

NO 


CR WHEN READY 
21 SCORE 74 PER 


74 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
22 SCORE 69 


PER 


69 


SUGGESTED 


GRADE 


(ABS) 


D 


(REL) 


D 


HIT 

NO 


CR WHEN READY 
23 SCORE 59 


PER 


59 


SUGGESTED 


GRADE 


(ABS) 


F 


(REL) 


D 


HIT 

NO 


CR WHEN READY 
24 SCORE 81 


PER 


81 


SUGGESTED 


grade 


(ABS) 


B 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
25 SCORE 71 


PER 


71 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
26 SCORE 52 


PER 


52 


SUGGESTED 


GRADE 


(ABS) 


F 


(REL) 


F 


HIT 

NO 


CR WHEN READY 
27 SCORE 82 


PER 


82 


SUGGESTED 


GRADE 


(ABS) 


B 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
28 SCORE 73 


PER 


73 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


C 


HIT 

NO 


CR WHEN READY 
29 SCORE 9 < 


PER 


9 ? 


SUGGESTED 


GRADE 


(ABS) 


A 


(REL) 


B 


HIT 

NO 


CR WHEN READY 
30 SCORE 74 


PER 


74 


SUGGESTED 


GRADE 


(ABS) 


C 


(REL) 


C 


HIT 


CR WHEN READY 


















.. GOODBYE .. 4311 
READY 




















By Netronics 

ASCII/BAUDOT, 
STAND ALONE 



Computer Sg* 
Terminal 1W 



The Netronics ASCII/BAUDOT Computer Terminal Kit is a 
microprocessor-controlled, stand alone keyboard/terminal 
requring no computer memory or software. It allows the use of 
either a 64. or 32 character by 16 line professional display for- 
mat with selectable baud rate, RS232-C or 20 ma. output, full 
cursor control and 75 ohm composite video output. 

The keyboard follows the standard typewriter configuration 
and generates the entire 128 character ASCII upper/lower case 
set with 96 printable characters. Features include onboard 
regulators, selectable parity, shift lock key, alpha lock jumper, 
a drive capability of one TTY load, and the ability to mate 
directly with almost any computer, including the new Ex- 
plorer/85 and ELF products by Netronics. 

The Computer Terminal requires no I/O mapping and 
includes lk of memory, character generator, 2 key rollover, 
processor controlled cursor control, parallel ASCII/BAUDOT 
to serial conversion and serial to video processing — fully 
crystal controlled for superb accuracy. PC boards are the 
highest quality glass epoxy for the ultimate in reliability and 
long life. 

VIDEO DISPLAY SPECIFICATIONS 

The heart of the Netronics Computer Terminal is the micro- 
processor-controlled Netronics Video Display Board (VID) 
which allows the terminal to utilize either a parallel ASCII or 
BAUDOT signal source. The VID converts the parallel data to 
serial data which is then formatted to either RS232-C or 20 ma. 
current loop output, which can be connected to the serial I/O 
on your computer or other interface, i.e.. Modem. 

When connected to a computer, the computer must echo the 
character received. This data is received by the VID which 
processes the information, converting to data to video suitable 
to be displayed on a TV set (using an RF modulator) or on a 
video monitor. The VID generates the cursor, horizontal and 
vertical sync pulses and performs the housekeeping relative to 
which character and where it is to be displayed on the screen. 
Video Output: 1.5 P/ Pinto 75 ohm (EIA RS-170) • Baud Rate: 
110 and 300 ASCII • Outputs: RS232-C or 20 ma. current loop 
• ASCII Character Set: 128 printable characters— 



'■mi / ()*+,-./0t23456789: ;<=>? 
MBCDEFWIMJWOWKT^ 
'abcdef9kijkl«nowrstuwx^z<l>| 



BAUDOT Character Set: ABC DEFGHIJKLMNOPQ 
RSTUVWXYZ-?:'3$#()., 901 4 15 7 ; 2/68* 
Cursor Modes: Home, Backspace, Horizontal Tab, Line Feed, 
Vertical Tab, Carriage Return. Two special cursor sequences 
are provided for absolute and relative X- Y cursor addressing • 
Cursor Control: Erase, End of Line, Erase of Screen, Form 
Feed, Delete • Monitor Operation: 50 or 60Hz (jumper 
selectable. 

Continental U.S.A. Credit Card Buyers Outside Connecticut 

CALL TOLL FREE 800-243-7428 



_ To Order From Connecticut Or For Technical — M 
H “ Assistance. Etc Call (203) 354-9375 I 

I Netronics R&D Ltd, Dept. PC10 
! 333 Litchfield Rd, New Milford, CT 06776 

I Please send the items checked below— 

I D Netronics Stand Alone ASCII Keyboard/Computer 
Terminal Kit, $149.95 plus $3.00 postage & handling. 

I D Deluxe Steel Cabinet for Netronics Keyboard/Termi- 
nal In Blue/Black Finish, $19.95 plus $2.50 postage 

I and handling. 

D Video Display Board Kit alone (less keyboard), $89.95 

I plus $3 postage & handling. 

D 12” Video Monitor (10 MHz bandwidth) fully assem- 

I blcd and tested, $139.95 plus $5 postage and handling. 

D RF Modulator Kit (to use your TV set for a monitor), 

I $8. 95 postpaid. 

D 5 amp Power Supply Kit In Deluxe Steel Cabinet 

I (±8VDC @ 5 amps, plus 6-8 VAC), $39.95 plus $2 
postage & handling. 

I Total Enclosed (Conn. res. add sales tax) $ 

By- 

I D Personal Check D Cashiers Check/Money Order 

D Visa D Master Charge (Bank # ) 

I Acct. # 



. Signature _ 
I Print 



JExp. Date _ 



City _ 



J State Zip - 

Bm mm warn D Send Me More Information am ■■■ aj 



CIRCLE 16 
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Radio Shack Announces 
Three New Computers 

BY KEN MAZUR 




T hree entirely new computer sys- 
tems were recently announced by 
Radio Shack, the largest single seller of 
personal comuters, expanding the 
company’s line of TRS-80 Model I and 
Model H systems. The new units are a 
Model III, a TRS-80 Pocket Computer 
and a TRS-80 Color Computer. 

Most powerful of the three is the 
Model III, featuring a 65-key key- 
board, 12-inch monitor, power supply 
and integral housing for two optional 
disk drives. 

The unit will be offered in a number 
of configurations, with a 4K Level 1 
Basic system selling for $699. A 16K 
version with Model HI (not Level III) 

Basic will be priced at $999; it features 
upper and lower case, plus a real-time 
clock for performing control functions. 

The computer is expandable to a 32K 
business system that includes two double-density, 40- track 
disk drives. The business system is in turn expandable to 48K 
($119 for 16K RAM upgrade) with four disks (two are 
external to the system). The business system retails 
for $2495. 

The Model HI has a dual-speed cassette interface that 
operates at either 500 or 1500 baud and the unit is compatible 
for the most part with Model I software. Other features 
include an expanded character set in the Model HI Basic, 
keyboard control screen printing that allows you to print the 
video display to hard copy, repeating keys and a video that 
produces crisp characters. 

The system has both a parallel interface and RS-232C 
serial interface. The RS-232C is included in the business 
system version of the unit but may be purchased for the other 
configurations for an additional $24.95. 

Although the Model HI can be purchased with no drives or 
two drives, a system can be upgraded for use with one disk 
unit at a cost of $849, which includes the controller. 

Available for the new system is Personal Software’s Visi- 
Calc, selling for $99.95 on disk. 

At the other end of the product line (in physical size) is the 
new TRS-80 Pocket Computer. In a full-page advertisement 
in the Wall Street Journal , Radio Shack touted its small 
machine by stating, “We’ve added a TRS-80 Pocket Com- 
puter that is a sensational ‘first’ on the market. Our experts 
say its Basic language makes it easier to program and more 
versatile than a programmable calculator, and we feel this 
TRS-80 newcomer makes the pre-today programmable cal- 
culator (cf. TI, HP, ours, etc.) about as state-of-the-art as a 
celluloid collar. A portable, pocketable miracle with an entry 
level price of $249.” 



The Pocket Computer, less than 7 inches long and weigh- 
ing 6 ounces, contains 11K ROM and 1.9K non-volatile 
RAM. It is reputed to be able to do many of the smaller jobs 
that the TRS-80 Model I can do. In Pocket Computer Basic 
you get 10-digit accuracy, 15 arithmetic functions, 24 
commands and editing. Basic resides in 7K of the ROM with 
the remaining 4K devoted to a monitor that features an editor 
and debug capabilities, according to a Radio Shack repre- 
sentative. Program statements, which are keyed in in normal 
fashion, are stored in compressed format in the unit to con- 
serve programming space. 

The small machine operates in four modes: Program 
Mode, Run Mode, Define Mode and Reserve Mode. In 
Program Mode, you enter your Basic program or LIST a 
program resident into the machine. A cursor moves across 
the display and enables you to edit your program. The Run 
Mode operates like that of the larger members of the Radio 
Shack computer family and is used to RUN a program. 

Using the Define Mode, you can access any given portion 
of a program by using a technique of labeling. In the tech- 
nique, you can label sections of a program (or label an entire 
program when you have more than one in the unit) by use of 
special label keys. The process is similar to the GOTO state- 
ment in Basic programming. 

The Reserve Mode lets you set aside a portion of memory 
in which you can place subroutines that may be common to 
several related programs. The subroutines can be accessed 
from Basic. The subroutines remain in the memory (as do 
your Basic programs) even when the machine is turned off 
and are cleared from memory with the NEW command. 

More than one program can be stored in memory simul- 
taneously through use of the CLOAD command. If a second 
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program (or more) is too large to fit into memory already 
holding one or more programs, the Pocket Computer will 
display an error message; resident programs will not be 
affected. 

The Pocket Computer video display is a 5 x 7 dot-matrix 
LCD readout that shows 24 characters at a time. Cursor 
control allows scrolling for program lines that take over 24 
characters. The additional characters are contained in an 
80-character buffer that has a manual playback feature. The 
unit cannot PRINT over 24 characters. Graphics are not 
supported. 

External program storage can be achieved through an 
optional cassette interface that provides entry of Radio 
Shack’s library of software or storage of user-programmed 
material. The cassette interface consists of a plastic-like 
frame that cradles the computer. The computer is connected 
to the frame; and the frame, in turn, is attached to a cassette 
recorder. For tape storage, you may use either a standard 
cassette recorder similiar to that used by the TRS-80 Model I 
or you may purchase a Miniset Recorder that is about the size 
of a book (1 5/16" x 6 3/16" x 4 9/16"). The interface will 
retail for $49 and the Miniset Recorder will cost $79.95. 

Power for the various components of the system comes 
from batteries. The computer uses four camera-type mercury 
batteries with a rated life expectancy of 300 hours. The 
cassette interface requires three AA batteries and the Miniset 
Recorder needs four AA batteries. 

Software packages for the new machine include Civil 
Engineering ($24.95), an aviation package ($24.95), Math 
Drill ($14.95), a games package ($14.95), Business Sta- 
tistics ($19.95), Business Finance ($19.95), Personal Fi- 
nance ($19.95>and Real Estate ($24.95). 



Radio Shack also enters the world of color capability with 
its TRS-80 Color Computer. The unit features instant-load 
Program Paks (ROM cartridges) that enable you to instantly 
program the system for a variety of educational and recrea- 
tional purposes. 

The new color system (which has a 6809E micro- 
processor) comes in several configurations, with prices start- 
ing at $399. The entry level machine has a 53-key keyboard, 
4K RAM, 8K ROM color Basic, an RS-232C expansion 
port, and a built-in connection to any television. For an 
additional $119 the machine can be upgraded internally to 
16K RAM and another $99 will outfit the machine with 16K 
ROM extended color Basic, The 16K extended color Basic 
version as a package sells for $599. 

For video output, the system may be attached to any 
television set (color or black and white) or may be used with 
Radio Shack’s color TV as the monitor. The Radio Shack 13" 
color TV retails separately for $399. 

Under normal operation the video display shows 16 lines 
by 32 characters. In color mode, resolution ranges from 32 x 
64 with eight colors to 192 x 256 with one foreground color 
and one background color. A company representative said 
even higher resolution is possible under assembly language 
programming. 

Peripherals for the system consist of a cassette recorder 
that is available immediately. Disk drives, a printer and a 
modem are to be released soon. Joystick controls are priced 
at $25. 

Radio Shack already has eight Program Paks: Chess, 
Quasar (a space game). Pinball, Football, Checkers, Per- 
sonal Finance, Math Bingo and Music. The prices for the 
pre-packaged software range from $30 to $40 each. □ 




FASTER THAN A SPEEDING TYPIST... 



Is it safe to walk the keyboard of your TRS-80 at night? Do you look for Syntax Errors down every dark subroutine? 
Well, look in your mailbox— It's a bill, it’s an ad, it’s CLOAD MAN! Faster than keying in hardcopy, more fun than 
an accounts-receivable package, ready to run in a single load . . . 



When mild mannered Clyde Cload (star 
cassette tape duplicator at the MONTHLY 
CLOAD) dons his cape, the evil Typo-Bugs 
cringe in terror. This mighty Man of Iron Oxide 
swoops down on your TRS-80 by First Class Mail 
every month with super, ready-to-load programs 
for your (and your computer’s) education and 
enjoyment. 

Join in the battle against the Finger-Cramps, 
Edit Modes, and Typo-Bugs. Let CLOAD MAN 
come to your computer’s aid by getting a 
subscription to CLOAD MAGAZINE. 



PRICES 




1 year subscription 


. . . 542.00 


6 month subscription 


. . . 523.00 


Single copies 


... 54.50 


Anthology-volume 1 


...510.00 


Anthology-volume 2 


...515.00 



The Fine Print: 

Overseas rates slightly higher— please write for them. 

Back issues available— ask for our list.* 

TRS-80 is a trademark of Tandy Corporation. 

California residents add 6% to single copies and anthologies. 
Programs are for Level II 16K and occasionally for 48K disks. 

*24 Level I back issues also available. 

Mastercharge/Visa Welcome Also Cash & Gold. 

c Copyright CLOAD MAGAZINE 1980 



MAGAZINE inc. 

P.O. Box 1267 • Goleta, CA 93017 
(805) 964-2761 
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Word Search 







Y ou’ve just sat down at your com- 
puter to do some serious work 
(after all, the Federation needs you to 
track down the Klingons) when your 
children come in. Of course, they want 
to play with the computer too. 

“Just one game,’’ you tell them. But 
usually that one game is either too long 
or too difficult or it doesn’t really 
satisfy them. 

This program is your answer. It uses 
little computer time but generates a 
game that should keep your children 
busy and away from the computer for 
some time. The program develops and 
prints a word search puzzle on your 
printer. 

For those of you who don’t have 
children addicted to this game, a word 
search is a two-dimensional array of 
seemingly random letters. Hidden 
among the letters are words in a straight 
line — either up, down, across, back or 
in one of the four diagonal directions. 
Accompanying the array is a list of 
words hidden in it. 

This program, written in Applesoft 
Floating Point Basic on an Apple II 
with DOS 3.2, uses about 6K for pro- 
gram storage and an additional amount 
of RAM for storing variables and 
strings. A 40 x 40 search will run on an 
48K Apple II with Applesoft in ROM 
and DOS booted. 

With a few minor changes (indicated 
in the discussion of the program lines) 
the program should run on any system 
using Microsoft Basic. Systems using a 
Basic which doesn’t have the LEFTS, 
MID$ and RIGHTS functions will have 
to make adjustments in lines 520, 530, 
540, 1340, 1350 and 1360. 



Systems that require dimensions for 
the length of a string (as opposed to the 
number of strings in an array) should 
also modify line 1060. If your system 
does not allow string arrays then you 
will have to extensively rewrite and 
limit the program to make it work. 



How to Use the Program 

Enter the coding and run. On an 
Apple II, the program first asks you for 
the peripheral slot in which your printer 
is located. Next the program asks for 
the width of your printer, the width and 



Sample Run 1 



WORD SEARCH 
COPYRIGHT <C) 1980 
BY 

MIKE FISCHER 
PRINTS A WORD SEARCH 
SPACE TO CONTINUE ♦ ♦ ♦'ESC' TO END 
PRINTER SLOT NUMBER IS ♦ 1 

MAXIMUM PRINTER WIDTH 1SX 63 

HOW MANY LETTERS WIDE SHOULD THE SEARCH BE? 
HOW MANY LETTERS LONG SHOULD THE SEARCH BE? 
WHAT PERCENT OF THE LETTERS OF THE 
SEARCH SHOULD BE WORDS? 20 



ENTER 


WORD : 


MICROCOMPUTER 


ENTER 


WORD ♦ 


BAUD 


ENTER 


WORD t 


INTERFACE 


ENTER 


WORD : 


BYTE 


ENTER 


WORD X 


RAM 


ENTER 


WORD X 


ROM 


ENTER 


WORD t 


PROGRAM 


ENTER 


WORD ♦ 


BASIC 


ENTER 


WORD : 


SERIAL 


ENTER 


WORD X 


MODEM 


ENTER 


WORD X 


MINIFLOPPY 


ENTER 


WORD t 


PASCAL 


ENTER 


WORD X 


ACCUMULATOR 


ENTER 


WORD t 


REGISTER 


ENTER 


WORD t 


APPLE 


ENTER 


WORD ♦ 


STRING 


ENTER 


WORD i 


VARIABLE 


ENTER 


WORD X 


D I MENS ION 


ENTER 


WORD X 


PRINT 



THAT' S 
PLEASE 



ENOUGH WORDS ♦ 

WAIT WHILE I WORK < 



TURN ON PRINTER ♦ 
PRESS ANY KEY WHEN 



READY ♦ 
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Illustration by Jacky Brill 




Sample Run 1 continued 

Word Search Words 



I D WQE Y T K SO Q W Y N L. B H H Z IJ N Z N Q L 
XLPTMKHKDZRBTLEMCAXVIXBEW 
WBAaTSAAQIG^XPHAHMEhriZHUS 

BNSYDRLECDGJCODDXIDLMZXKI 

PVL.KBXMMIJTMN JPDRSO I WE XL X Y 
MW X XCWAMNH X HPOUAQC AZSX XRT 
A L E PKXAQ F R D O Z Q P K T Q Z A J AM P E 
TUXLAWAKTKLDARNXSMBUUEMUW 
LFMVPORSKFQZORKEGPHDLMNEG 
NSKZCPLC X W X GEGRF AUW ALL.SNR 
JBCRBQANHDRGBXAWJTGXEKILT 
TLMK QG X FK A X F A VB JBEXLQF .JB X 
ZEQFHMGBMSYLWALAQRBYOAZRX 
GLBL JFWETENYVGUGUAEPRCAUR 
LUWATXTEDMCMCDZK X BY XOMAET 
GGNEAURHGNYLAWERXEZEZXEPG 

•r a v. r a k x 1 1 it r.viA TA-l'YLi -y L-' »••• /*' \y 




FHRK INTERFACERMZASJZXFAVP 



MICROCOMPUTER 

BAUD 

INTERFACE 

BYTE 

RAM 

ROM 

g AM 

SERIAL 

MODEM 

MINIFLOPPY 

PASCAI 

tmm™ 

APPLE 

STRING 

VARIABLE 

PfOTP I0N 



Answer 



♦ ♦ ♦ ♦ ♦♦♦♦♦♦♦&»♦♦♦♦ ♦ ♦♦♦♦♦♦♦ 

♦ ♦ F* ♦ ♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 

»*S**R****»»*0***.l!*»***»* 

♦ ♦ AM ♦♦♦♦♦♦♦ EG ♦ Y ♦ ♦ R ♦ ♦ ♦ ♦ CNB 

♦ *L MN ♦ P ♦ ♦ ♦ O ♦ ♦ ♦ I ♦ I Y 

♦ ♦ * ♦ » ♦ ♦ ♦ ♦♦I*P*»* ♦ C ♦ ♦ S ♦ ♦ R T 

♦ ♦ E ♦ ♦ ♦ ♦ ♦ ♦ R ♦ O ♦ ♦ P ♦ ♦ O ♦ A ♦ ♦ ♦PE 

♦ ♦ ♦ L ♦ ♦ ♦ ♦ T ♦ L. ♦ ♦ R ♦ ♦ SMB ♦♦♦♦♦♦ 

♦ ♦ ♦ *P**S*F* ♦ OR ♦ E ♦ P ♦ ♦♦ ♦ ♦♦ ♦ 

♦ (.»E ♦ R ♦ ♦U ♦♦♦♦♦♦♦ 

♦ ♦♦ ♦♦ ♦ AN ♦ ♦ RG »I»*»T»»E»»* ♦ 

♦ ♦ ♦ ♦ ♦ ♦ I ♦ ♦AX ♦ A ♦ ♦ ♦ BE ♦ L ♦ ♦ ♦ ♦ ♦ 

♦ ♦ ♦ ♦ ♦ M ♦ ♦ MS ♦ L ♦ ♦ ♦ A ♦ RB ♦ ♦ ♦ ♦ R ♦ 

♦ ♦ ♦ ♦♦ ♦♦•T»»*^»U» ♦ A ♦ ♦ ♦ ♦ A ♦ ♦ 

♦ ♦ ♦ ♦ ♦ ♦ ♦ E ♦ ♦ ♦ ♦ ♦ D ♦ ♦ X ♦ ♦ ♦ ♦ M ♦ ♦ ♦ 

♦ ♦♦♦♦♦R + ♦♦♦♦♦ ♦♦R ♦♦♦♦♦♦♦♦ ♦ 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦£♦♦♦♦♦♦♦♦♦♦ 

♦ ROT ALUMUCCA ♦ V ♦♦♦♦♦♦♦♦♦♦ ♦ 
♦NO ISNEMID ♦ ♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦* 

♦ ♦ ♦ ♦ INTERFACE ♦ ♦ ♦ ♦ ♦ ♦ ♦ ♦ ♦ ♦ ♦ ♦ 



Sample Run 2 



Word Search 



K A U X 
L Z K A 
K J N Z 
B A S I 
PFOR 

0 U P B 

Y S S Y 

Y A I T 
HUK Y 
L VI B 
K F F N 
B W P N 
LGVZ 
K N X P 
T R H 0 
R 0 Z I 
C X G N 
E R J C 

1 Q W L 
DLF Y 



Z H Q K R J D 
BKVLBEY 
FHGWXH A 
C V P J X W 0 
TRANEUI 
Y H J R G 0 N 
LOBOCNT 
WFSUTLE 
UHSHHPR 
X R H R 0 S F 

0 I E H S X A 

DTFH JBC 
U E C P P R E 

1 K B U Z E J 

COHUWTH 
U J U M G N A 
XGHVHIR 
FXVTKRH 
GYIHUPP 
LNZU YK 



K C C M X 
U H R N X 
E I L E F 
K 0 0 B F 
I ZCTH 
X.E K L L 
B D U A H 
S K K C B 
U K C S R 
G E R A T 
G Y U P I 
JBNRF 
X 0 J V R 
C A L T N 
R R H A W 
ZD ASH 
XZWEH 
Y A D H G 
A 0 A E D 
HHH I I 



E C R E 
U M N 0 
HG YU 
EEKO 
K N V Z 
KCXK 
P S I L 
SEG V 

Y P A U 
U T T F 
M F E A 

0 I T S 
R E Y S 
D U J E 
U M D M 
N J K B 
R S C L 

1 U L E 

Y I I R 
UGBS 



Words 

BYTE 

RAH 

ROH 

COMPUTER 

INTERFACE 

BISK 

MODEM 

KEYBOARD 

PRINTER 

CRT 

BASIC 

PASCAL 

LISP 

FORTH 

FORTRAN 

COBOL 

ASSEMBLER 

DEBUG 



Answer 



BASIC 

FORTRAN * , I 

N ♦ ♦ ♦ L ♦ ♦ ♦ ♦ 



T * M 
R 0 ♦ 
C ♦ ♦ 



L 0 B 0 C * T ♦ ♦ * A . P S I L 

* E ♦ ♦ ♦ C B ♦ ♦ ♦ ♦ 

♦ R t K ♦ S * Y * ♦# 



♦ ♦ E * 
D T . . 
U E * ♦ 
» • B » 



* A ♦ Y ♦ P . N F E A 

♦ C ♦ B • ♦ ♦ 0 ♦ ♦ S 

R E « 0 i ♦ R R ♦ ♦ S 



♦ ♦ ♦ U ♦ T M . R H H 

♦ ♦ ♦ ♦ G N A ♦ D . ♦ M * . K B 

I R » ♦ ♦ E • » S ♦ L 



P * ♦ 0 
♦ . M ♦ 
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Figure 1 



472 IF ASC ( MID$ (A$,A,1)) = M(R,C) THEN 480 
474 A = L : NEXT A : GOTO 400 

550 M(R,C) = ASC (MID$ (A$,A,1)) : ON X GOSUB 300, 
310, 320, 330, 340, 350, 360, 370 

1330 IF M(R,C) > 0 THEN 1370 



Figure 2 



1040 IF SW > 9 AND SL > 9 AND SW < = PW/2 THEN 

1060 

1050 PRINT "DIMENSIONS MUST BE AT LEAST 10 AND" 
PRINT "WIDTH MUST BE LESS THAN "? INT (PW/2) + 1 : GOTO 
1010 

1420 HTAB ( PW-SW* 2 ) /2 + 1 : PRINT M$(A) : PRINT 

1480 FOR A = 1 TO SL : HTAB (PW-SW*2)/2 + 1 

1411 A$ = M$ ( A) : M$ ( A) = " " 

1412 FOR Y = 1 TO LEN (A$) 

1413 M$ ( A) = M$ (A) + MID$ (A$,Y,1) + " " 

1414 NEXT Y 

1415 M$ (A) = LEFT$ ( M$ ( A) , LEN (M$(A))-1) 

1481 A$ = N$ ( A) : N$(A) = "" 

1482 FOR Y = 1 TO LEN ( A$ ) 

1483 N$ ( A) = N$ ( A) + MID$ (A$,Y,1) + " " 

1484 NEXT Y 

1485 N$ ( A) = LEFT$ ( N$ ( A) , LEN (N$(A))-1) 

1486 PRINT N$ ( A) : PRINT : NEXT A 



length of the search (in number of 
letters), and the percentage of the 
search that should contain words. 

The search must be at least 10 letters 
wide and 10 letters long and no wider 
than your maximum printer width. The 
maximum percentage of words the 
search can contain is 25%. This rather 
arbitrary limit was chosen so that the 
computer would not run too long in 
trying to fit all the words into a search. 
You can modify line 1070 to permit a 
higher percentage. 

The program next asks you to enter 
words to be placed in the search. You 
can input the words in any order. The 



longest word does not have to be given 
first. 

After each word is entered, the pro- 
gram tells you if the word is too long to 
fit or if the maximum percentage has 
been reached. It then asks you to wait 
and goes to work putting the words in 
the search. 

When all the words have been placed 
in the search (a 20 x 20 search with 
15% words averages two minutes run- 
ning time), the computer prompts you 
to turn on your printer. It then prints the 
search, the words in the search, and the 
answer. 

The finished search is designed to be 



centered on the printer page. Thus, if 
your screen display is not the same 
width as your printer the search may be 
off center or broken up on your screen 
display. 

How the Program Works 

Line 10 resets the Apple screen to 
normal. It should be modified or 
deleted by non- Apple users. 

Line 20 clears the screen (HOME; 
TRS-80 users should use CLS) and sets 
up a title page display in lines 5000 to 
5090. The format for the title page is 
that used by the San Francisco Apple 
Core. The GET command in line 5060, 
similar to the IN KEY$ command in 
TRS-80 Level II Basic, permits entry of 
any single character without hitting 
Return. CHR$(27) in line 5070 is ASCII 
“Escape” on the Apple n. 

Lines 30 to 40 are only for Apples 
with printer interface cards in one of the 
peripheral slots. Others should delete 
these lines and modify lines 1390 and 
1490 to call whatever printer driver 
routine their system uses. 

Line 50 skips over the subroutines to 
the beginning of the program. The sub- 
routines are placed near the start of the 
program for increased execution speed. 

(The program uses several nested 
FOR . . .NEXT loops. For ease of 
following the coding I have not elimi- 
nated the variable name for the NEXT 
statements, although this would also 
speed up the program.) 

Line 1000 clears the screen and gets 
the maximum printer width. The 
“D$=” command sets up a control 
character for use with Apple II DOS 
and should be deleted by non-Apple II 
DOS users. If you don’t want printer 
portability, line 1000 can be changed to 
assign PW a value equal to your maxi- 
mum printer width. 

Lines 1010 to 1080 get the various 
search dimensions, check them for 
validity, and dimension the arrays 
used. (See variable listing in lines 5100 
to 56 10 of the program.) 

Lines 1 100 to 1 150 get the words for 
the search, check that they aren’t too 
long, and let you know when the 
computer has enough words for the 
array. 

Lines 1160-1210 initialize the 
numeric checking array and the search 
string array. 

Lines 1220 to 1280 place each word 
in the search array, starting with the 
largest word and working down to the 
smallest. The subroutine called by line 
1260 starts by selecting at random one 
of eight directions for the word (line 
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400) and a random starting point (lines 
420 to 430). It next checks that the 
starting point will leave enough room 
for the direction it has selected (lines 
440 and 100 to 290). 

The program then saves the starting 
row and column (line 450) and checks 
that the word won’t overwrite part of 
another word already entered in the 
array (lines 460 to 490 and 300 to 370). 
The word is then entered into the array 
in lines 500 to 570. 

Lines 1290 to 1370 save a copy of the 
search array with just the words entered 
into it as an answer, and place random 
letters in the blank spaces in the other 
array. 

Line 1380 clears the screen and 
prompts you to turn on the printer. The 
POKE command clears the keyboard 
strobe on the Apple. Without the 
POKE, if you pressed a key after enter- 
ing the last word (line 1150), the com- 
puter would use that key as C$ and 
continue right through to line 1390 
without waiting for you. Non-Apple 
users should delete or modify the POKE 
and GET commands. 

Line 1390 is the output to printer 
routine for Apple DOS with a printer 
card in a peripheral slot. Modify as 
needed for your printer driver routines. 

Lines 1400 to 1430 print the search. 
The HTAB commands in lines 1400 and 
1420 center the printing. If your com- 
puter does not recognize HTAB, or if 
your printer does not respond to HTAB, 
then substitute PRINT TAB( . . .) for 
HTAB and delete the “41” from each 
calculation from these lines and lines 
1440 to 1480. 

Lines 1440 to 1450 print the words in 
the search and lines 1460 to 1480 print 
the answer. 

Modifications 

Two modifications can be made to 
the program. The first permits two 
words to share the same letters in the 
search. To do this add lines 472 and 474 
and change lines 550 and 1330 as 
shown in Figure 1. 

The second modification spreads out 
the printing of the array at a sacrifice of 
1/2 of the maximumwidth of the array. 
However the final printed product is far 
easier to use. To make this change 
modify lines 1040, 1050, 1420, and 

1480 and add lines 1411 to 1415 and 

148 1 to 1486 as shown in Figure 2. □ 

Mr. Fischer is an attorney and com- 
puter hobbyist from California. He is a 
member of the San Francisco Apple 
Core and the Apple Puget Sound 
Program Library Exchange. 



Program Listing 

.1. 0 POKE .16298 * 0 ? TEXT 
20 HOME ? GQSUB 5000 

30 HOME t INPUT " PRINTER SLOT NUMBER IS? ” *PS 
40 IF PS > 7 OR PS < .1. OR PS < > INT < PS ) 

THEN PRINT "PRINT SLOT MUST BE A WHOLE 
NUMBER"? PRINT "BETWEEN .1 AND 7 ♦ " ? FOR 
A a .1. TO 1000? NEXT A? GOTO 30 



50 


GOTO 


1000 


100 


IF R 


4 L > SL THEN 400 


1 10 


IF C 


4 L > SW THEN 400 


120 


GOTO 


450 


130 


IF R 


- L < 1 THEN 400 


1 40 


IF C 


- 1... < 1 THEN 400 


150 


GOTO 


450 


160 


IF R 


4 L > SL THEN 400 


170 


IF C 


- L < 1 THEN 400 


ISO 


GOTO 


450 


190 


IF R 


- L < 1 THEN 400 


200 


IF C 


4 L. > SW THEN 400 


210 


GOTO 


450 


220 


IF R 


4 L > SL THEN 400 


230 


GOTO 


450 


240 


IF R 


- L < 1 THEN 400 


250 


GOTO 


450 


260 


IF C 


4 L > SW THEN 400 


270 


GOTO 


450 


280 


IF C 


- L. < 1 THEN 400 


290 


GOTO 


450 


300 


R a R 


4 1?C = C 4 1? RETURN 


310 


R a R 


- 1 ?C a c - 1? RETURN 


320 


R a R 


4 1?C a C - 1? RETURN 


330 


R a R 


- 1?C a c 4 1? RETURN 


340 


R = R 


4 1 ? RETURN 


350 


R a R 


- 1? RETURN 


360 


C a C 


4 1? RETURN 


370 


C a c: 


- 1? RETURN 


400 


X a 


INT ( 8 * RND < 1 >41) 


410 


L a i 


L.EN < A* ) 


420 


R a 


INT < SL * RND <1)4 1 


430 


C = 


INT < SW * RND <1)41 



440 ON X GOTO 100 * 130 y 160 * 190 * 220 y 240 * 260 y 2S0 
450 RS = R?CS « C 
460 FOR A « 1 TO L 

470 IF M< R y C ) = 1 THEN A =- L ? NEXT A? GOTO 400 

480 ON X GOSUB 300 y 310 y 320 y 330 y 340 y 350 y 360 y 370 

490 NEXT A 

500 R a RS ? C « CS 

5.10 FOR A « 1 TO L 

520 IF C < 2 THEN M*< R ) = MID* <A*yAyl) 4 

RIGHT* < M*< R ) y SW - 1)? GOTO 550 

530 IF C a SW THEN M$( R ) a LEFT* <M*<R)ySW - 
1) 4 M I D* < A* y A y 1 ) ? GOTO 550 
540 M*< R ) a LEFT* <M*<R)yC -1)4 MID* < A* y 
Ay 1 ) 4 RIGHT* < M*< R >ySW - C > 

550 M(RyC) a 1? ON X GOSUB 300 y 310 y 320 y 330 y 340. 

y 350 y 360 y 370 
560 NEXT A 
570 RETURN 

1000 HOME ?D* a CHR* < 13 ) 4 CHR* < 4 >? INPUT 
"MAXIMUM PRINTER WIDTH IS? "yPW 
1010 INPUT "HOW MANY LETTERS WIDE SHOULD THE 
SEARCH BET ” *SW 

1020 INPUT "HOW MANY LETTERS LONG SHOULD THE 
SEARCH BET " ySL 

1030 MS a SW? IF SL > MS THEN MS = SL 
1040 IF SW > 9 AND SL > 9 AND SW < a PW THEN 
1060 

1050 PRINT "DIMENSIONS MUST BE AT LEAST 10 AND 
"? PRINT "WIDTH MUST BE LESS THAN "yPW 4 
1? GOTO 1010 
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Program Listing continued 



.1.060 DIM MCSLySWK DIM M*<SL>: DIM A*< MS * 2 ) X DIM N*< S L_ ) 
1070 . PRINT "WHAT PERCENT OF THE LETTERS OF THE " l INPUT 

"SEARCH SHOULD BE WORDS? " y PC t IF PC > 25 THEN PRINT 
"NO MORE THAN 257." t GOTO 1070 
1080 PC « SW * SL * PC / 100 

1090 g ^ i:tl « o:wl.. b o 

1100 INPUT "ENTER WORD t " yA*< Q > 

1110 IF LEN <A*(Q>> > MS THEN PRINT "WORD MUST HAVE " 

$ MS?" OR FEWER LETTERS*": GOTO 1100 

1120 IF LEN <A*<G>> > WL THEN WL == LEN < A*< G > ) 

1130 TL = TL. + LEN < A*< G ) ) 

1140 IF PC > TL THEN G ~ G + 1 t GOTO 1100 

1150 PRINT "THAT'S ENOUGH WORDS*": PRINT "PLEASE WAIT W 
HILE I WORK*" 

1160 FOR B = i TO SL 
1170 FOR C 1 TO SW 
1180 M( B y C ) b 0 
1190 M*< B ) B M*< B ) + " * " 

1200 NEXT C 
1210 NEXT B 

1220 FOR G = WL TO 1 STEP - 1 
1230 FOR B b 1 TO G 

1240 IF LEN <A*<B>> < > G THEN 1270 

1250 A* b A*< B > 

1260 GOSIJB 400 
1270 NEXT B 
1280 NEXT G 
1290 FOR R « i JO SL 
1300 N*< R ) b M*< R > 

1310 FOR C ~ 1 TO SW 

1320 LT b I NT < 26 * RND < 1 ) > + 65 
1330 IF M< R y C ) ~ 1 THEN 1370 

1340 IF C < 2 THEN M*< R ) = CHR* < LT > + RIGHT* <M*<R)y 

SW - 1 >: GOTO 1370 

1350 IF C b SW THEN M*< R ) = LEFT* < M*< R >rSW - 1 > + CHR* 

< LT ) : GOTO 1370 

1360 M*< R ) = LEFT* <M*<R)yC - 1> + CHR* ( LT > + RIGHT* 

< M*< R ) y SW - C ) 

1370 NEXT C: NEXT R 

1380 HOME : POKE - 16368 PRINT "TURN ON PRINTER*": PRIN1 
"PRESS ANY KEY WHEN READY*": GET C* 

1390 PRINT D*y "PR#" $PS 

1400 HTAB <PW - 11) / 2 + i: PRINT "WORD SEARCH": HTAB' 

< PW - 11) / 2 -! i: PRINT " ": PRINT : PRINT 

1410 FOR A ~ 1 TO SL 

1420 HTAB (PW - SW) / 2 + IS PRINT M*< A ) 

1430 NEXT A 

1440 PRINT : PRINT : PRINT : HTAB (PW - 5) / 2 4 * U PRINT 

"WORDS”: HTAB < PW — 5 >. / 2 P 1 : PRINT " ": PRINT 



5430 

5440 

5450 

5460 

5470 

5480 

5490 




5560 

5570 



REM 

REM 

REM 

REM 

REM 

REM 

REM 



REM 

REM 

REM 



m 

REM 

REM 



REM 



TO BE WORDS 
PS— SLOT NUMBER OF 

PRINTER INTERFACE 
PW— WIDTH OF PRINTER 
LINE 

G-NUMBER OF WORDS IN 



SEARCH 

SAVER 

SL.— WORD SEARCH LENGTH 

LETTERS IN WORDS 
WL— LENGTH OF' LONGEST 
WORD IN SEARCH 




-300 
5810 
5820 

ii|8 

5850 

5860 

5870 

5880 



£8 



X-INDICATOR OF WHICH 
DIRECTION WORD IS 
BEING ENTERED INTO 
ARRAY 

vjj* ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ 

* LINE DOCUMENTATION * 

\j|^ ^ ^ ^ ^ ^ jjj- ^ vjj- Vjj^ ^Lr ^ ^ ^ 

10-RESET SWITCHES " 



|IL 

REM 

REM 

REM 

REM 

REM 

REM 

REM 



TO 



100— CHECK THAT INITIAL 
ROW AND COLUMN 

...iftCfoSteNQ 



JW ...AND 



S°bF , BofiB p 



450- 



510“ 



DIRECTION „ 

WORD PLACEMENT 
-CHECK IF WORD 
LOCATION CONFLICTS 
WITH AN ALREADY 



or 



N 



5910 

5920 



59 v 
5960 
5970 
5980 



5990 

6000 

6010 

6020 

6030 

6040 



60 50 
60 60 



REM 

REM 




SEARCH 

1000— OBTAIN SEARCH AND 

”~-isRi«*Egr 



REM 1 1 60 - I N I T I AL I7E ARRAYS 
REM 1220 -ENTER EACH WORD 
REM IN ARRAYS 

REM 1290-FILL BLANKS WITH 
REM RANDOM LETTERS 

REM 1 380 -PR I NT SEARCH 
REM 1440-PRINT WORDS IN 
REM SEARCH 

REM 1 460 -PR I NT ANSWER 
REM 50 00 -STAND ARD OPEN I NG 
REM CONVENT I ONS OF 



October 1980 Personal Computing 39 



1450 

1460 

1470 



1480 

1490 
1500 
5000 
5010 
5020 
5030 
50 40 
50 50 
5060 
5070 

5080 

5090 

5100 

5110 

5120 

5130 

318 

5160 

5170 

5180 

5190 

5200 

5210 

5220 

5230 

5240 

5250 

5260 

5270 

5280 

5290 

5300 

5310 

5320 

5330 

5340 

5350 

5360 

5370 




5420 



FOR A = 1 TO Q: HTAB < PW - SW > / 2 T 1 : PRINT A$< A 
NEXT A 

PRINT X PRINT t PRINT X FOR A ~ 1 TO PW t PRINT "*" 
y X NEXT A 

PRINT : PRINT : HTAB < F'W - 6 ) / 2 + 1 X PRINT "ANSW 
ER" : PRINT : FOR A = 1 TO PW : PRINT iX NEXT At PRINT 

FOR A = 1 TO SLt HTAB < PW - SW ) / 2 + 1 X PRINT N*< 

A)t NEXT A 
PRINT D*y"PE#0" 

END 

VT AB 4S HTAB 14 X PRINT " WORD SEARCH” 

VTAB 6X HTAB 11 X PRINT "COPYRIGHT <C> 1980" 

VTAB 8 X HTAB 19 X PRINT "BY" 

VTAB 10% HTAB 14 X PRINT "MIKE FISCHER" 

9 TAB 14 X HTAB 10 X PRINT "PRINTS A WORD SEARCH" 

VTAB 22 X PRINT "SPACE TO CONTINUE ♦ ♦ ♦ ' ESC' TO END" 

VTAB 23: HTAB 20 : GET A* 

IF A* = CHR* < 27 ) THEN HOME : VTAB 20 X HTAB 12 X PRINT 
"*** THE END ***" t END 
IF A* = CHRiH < 32 > THEN RETURN 
GOTO 5060 
REM 

REM He VARIABLES USED He 
REM ****************** 

REM 



60 70 


REM 


S ♦ F ♦ APPLE CORE 


6080 


REM 


5 100 -DOCUMENT AT I ON 


1 OF 


60 90 


REM 


VAR TABLES 




6100 


REM 


5700— DOCUMENT AT ION 


I OF 


6110 


REM 


LINES 




6900 


REM 


******* NOTE ******* 


6910 


REM 


He He ALL LINES FROM 


He He 


6920 


REM 


He He 5100-6970 ARE 


He He 


6930 


REM 


He He DOCUMENTATION 


He He 


6940 


REM 


He He AND CAN BE 


He He 


6950 


REM 


He He DELETED IF 


He He 


6960 


REM 


He H< DESIRED » 


He He 


6970 


REM 






7000 


REM 


****************** 


7010 


REM 




He 


7020 


REM 


WORD SEARCH 


He 


7030 


REM 




He 


7040 


REM 


COPYRIGHT 1980 


He 


7050 


REM 




He 


7060 


REM 


BY MIKE FISCHER 


He 


7070 


REM 




He 


7080 


REM 


MARCH 3 y 1980 


He 


7090 


REM 




He 


7100 


REM 


< 415 ) 933-4435 


He 


71 10 


REM 




He 


7120 


REM 


He He He He He He He He He He He He He He He H< He He 



m 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 




REM 



!^M A feES8B N ^EK E r, 

INTO SEARCH 
A *< He )— WORD ARRAY 
B - G E N E R A L C O IJ N T E R 
C— COLUMN NUMBER 
C$— CONTINUE STRING 
CONTROLLER 

CS-CGLUMN NUMBER SAVER 
Dil>— DISC CONTROL SYMBOL 
G - G E N E R A I. .. C O U N T E R 
L— LENGTH OF WORD BEING 
ENTERED INTO SEARCH 
LT— RANDOM LETTER 
SELECTOR 

M3K He >— ARRAY HOLDING 
ROWS OF WORD 
SEARCH 

M< * y * )— NUMBER ARRAY 
SHOWING USED 
SPACES IN WORD 

QPAC'PW 

MS— MAXIMUM SIZE OF 



EITHER WORD SEARCH 




PC-PERCENT OF SEARCH 




Pricing Your Product 

for a Two-Step Distribution Channel 



BY IRA S. GERSON 



M ost manufactured goods as well as many agricultural 
products are sold through a two-step channel, often 
referred to as the orthodox or customary channel for moving 
consumer goods. This program lets you develop a pricing 
structure based on quantity price breaks and account for the 
various gross margins required by the retailer, wholesaler 
and manufacturer. 

Manufacturers of consumer goods will find this program 
useful in formulating their quantity pricing structure. With a 
printer, manufacturers can use it to generate the final price 
sheet. 

This program is not directly applicable to retailers or 
manufacturers who are in a one-step distribution channel. 
(See my article “Generating A Price List,” for a one-step 
channel in the February 1980 issue of Personal Computing.) 
However, these manufacturers can use it to analyze the costs 
and margins associated with the two-step distribution form. 
Therefore, the wholesaler as middleman and the manufac- 
turer requiring two middlemen will benefit most directly 
from this program. 

The equipment used included a TRS-80 with 4K RAM and 
Level I Basic Language. The program should be easily 
adapted to other machines. 

This program reduces the time required to generate price 
sheet structure for any number of products and price breaks 
due to multiple quantity discounts. With some modifica- 
tions, the program could be used to generate the actual price 
sheets. 

The program could also analyze various price structures 
given this type of distribution channel, to determine the 
feasibility of entering an existing market with a new or 
modified product. The program can aid in the review of price 
reductions/increases if the market price (List Price) does not 
allow desired margins because of decreasing/increasing 
costs in the distribution channel or at the point of manufac- 
ture. Here’s an example of analyzing price structures from a 
manufacturing point of view: 

Given: (A) Must achieve corporate goal of 40% GM for an 
annual production run of 5000 units that have a standard cost 
of $249. 00/Unit. (B) Market research and analysis indicates 
that $ 1000/Unit is the target price for the end user. 

Solve: Determine the pricing structure to yield the above 
goals. 

Assumptions: (A) You have 10 distributors to whom the 
following allocation has been estimated. 



1st Distributor (Wholesaler) 
2nd Distributor 
3rd Distributor 
4th thru 10th Distributor 
(10 to 100 units each) 



2500 Units/yr. 
1500 Units/yr. 
500 Units/yr. 
500 Units/yr. 

5000 



Mr. Gerson has formed a consulting/ software firm as a result 
of his research work in microcomputer business applications. 



(B) The distributor buying the largest volume is given 35% 
off dealer net. 

(C) The larger dealers are looking for 40% off list. 

Based on the above data you might input the following 



figures into the program. 

1 . Maximum % Off List 40 

2. Dealer Discount/Break 3 

3 . Maximum % Off Dealer Net 35 

4. Wholesaler Discount/Break 3 

5. Minimum Mfg. GM (%) 40 

6. Number of Price Breaks 4 



From the display the following calculations can be made. 

Sales 

2500 X $415 = $1,037,500 
1500 x $456 = $ 684,000 
500 x $499 = $ 249,500 
500 x $543 = $ 271,500 

5000 $2,242,500 

Cost 

$249x5000 = $1,245,000 
GM = $997,500 = 44% 

Therefore, you can adopt this structure or refine it further by 
reducing the minimum MFG GM to 36% or increasing the 
number of price breaks or selectively altering any of the 
breaks to yield an overall GM level of 40%. 

The program consists of two main sections and includes a 
menu for added flexibility. The opening (lines 10 to 20) 
creates the mechanics for the menu. 

The first section (lines 22 to 96) develops the “marketing 
approach” which requires the user to input the list price and 
the various margins required by the channel participants. 

Lines 70 to 84 in the first section contain the three basic 
formulas necessary to derive the Dealer’s Net (D), the Whole- 
saler’s Net (W), and the Manufacturer’s Cost (C). 

The first formula to determine the dealer’s net is: 

D = P(1 - A/100) 

where P is the List Price and A = % Off List for the Dealer. In 
the example given: 

D = $49.95 (1 - .30) = $34.% 

The second formula to determine the wholesaler’s net is: 
W = D(1 -B/100) 

where D is taken from the previous calculation and B = % 
Off List for the Wholesaler. In the example given: 

W = $34.% (1 - . 18) = $28.67 
The third formula to determine the cost is: 

C = P (1 - X/100) (1 - Y/100) (1 - H/100) 
where P is the List Price, X and Y are the maximum % off list 
for the Dealer and Wholesaler, and H is the minimum gross 
margin selected for the manufacturer. In the example given: 
C = $49.95(1 - .45) (1 - .38) (1 - .30) = $11.92 
The second section (lines 98 to 174) develops the “manu- 
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Puts sophisticated business strategies at the 
fingertips of all TRS-80 Level II owners! FIN- 
PLAN: A Financial Planning Program for 
Small Businesses is the most complete financial 
planning program available. 

Here’s why . . . Developed by an expert: The 
author, Robert Montgomery, is president of a 
management consulting firm and a recognized 
authority on new product planning. Easy to use: 
Data can be entered from normal balance sheet 
statements. Within seconds, FINPLAN will pro- 
vide financial projections for up to 5 years. Ver- 
satility: Are you thinking about modernizing 
equipment, expanding into a new product line, or 
starting a new business from scratch? Will your 
plans run you out of business, out of cash, or on to 
the Fortune 500 list? FINPLAN will answer these 
and other financial questions before you invest a 
dime. Extensive documentation: You don’t have 
to be a financial wizard to use FINPLAN be- 
cause it comes with 80 pages of documentation. 



or Call Toll Free, 24 hours a day, 
(1-800-827-3777, ext. 302)* TO CHARGE 
YOUR ORDER TO Master-Charge or Visa! 
Minimum order is $10.00; Customer pays 
postage and handling. 

‘From Missouri, call 1-800-892-7655, ext. 302 



Hayden Book Company, Inc. 

50 Essex Street 
Rochelle Park NJ 07662 



Available at your 
local computer store! 



Presented in a step-by-step format, the documen- 
tation is a great learning tool for those who need it 
or a dynamic applications tool for getting the most 
out of FINPLAN. And, FINPLAN is reasonably 
priced. #05103, TRS-80 Level II cassette, $69.95; 
#05108, TRS-80 Level II Disk, $74.95. 
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factoring approach” which requires the user to input the 
manufacturing cost instead of the list price as above. 

Lines 146 to 154 in the second section contain similar 
equations to the three above but have been modified so that 
cost can be the given parameter as opposed to the given 
parameter of list price used in the marketing approach. 

The formula to determine the Dealer’s Net is: 

D = (C (1 - A/100))/((l - X/100) (1 - Y/100) (1 - H/100)) 
where C is the cost, X and Y are the maximum % off list for 
the Dealer and Wholesaler, and H is the minimum gross 
margin selected for the Manufacturer. In the example given: 
D = $11.92 x (1 - .30)/(l - .45) (1 - .38) (1 - .30) = 
$34.% 

The formula to determine the Wholesaler Net, W = Dx 
(1 — B/100), is the same as that used in the marketing 
approach. 



The formula to determine the List Price is: 

P = C/((l - X/100) (1 - Y/100) (1 - H/100)) 
where C is the given cost and X, Y and H are described 
above. In the example given: 

P = $11.92/(1 - .45) (1 - .38) (1 - .30) = $49.94 

There are several other items that are associated with a 
pricing schedule but have not been included here for the sake 
of simplicity. They are cumulative quantity discounts, co- 
operative advertising allowances and cash discounts. 

This program can assist in the analysis of the following 
programs: 

1 . New Product Introductions 

2. Channel Impact As a Result of Price or Cost Reduc- 
tions/Increases 

3. Gross Margin Analysis 

4. Product Volume Mix □ 



Given: You are a manufacturer or wholesaler who wishes to supply a product which could command a list price of $49.95 per 
unit in the market place. There are six price breaks (i.e. 1-12 units, 13-36 units, 37-72 units, 73-144 units, 145-180 units, 
& over 180 units) and you input the distribution discounts as follows: 



Maximum (%) offlist 
Dealer discount per break (%) 

Maximum (%) off wholesale net 
Wholesaler discount per break (%) 

Minimum manufacturing GM (%) 

Number of quantity price breaks 

The following should appear on the CRT: 



45 

3 Sample 

38 

4 
30 
6 




MODEL 

DESP 


LIST 

PRICE 

$ 


ORDER 

QUANT 

UNITS 


DLR 

NET 

$ 


% 

OFF 

LIST 


ORDER 

QUANT 

UNITS 


WHOLSLE 

NET 

$ 


% 

OFF 

LIST 


MFG 

COST / 
$ 


l GM 


* 


49.95 


* 


34.96 


30 


* 


28.67 


18 


11.92 


58 




49.95 




33.47 


33 




26.11 


22 


11.92 


54 




49.95 




31.97 


36 




23.66 


26 


11.92 


50 




49.95 




30.47 


39 




21.33 


30 


11.92 


44 




49.95 




28.97 


42 




19.12 


34 


11.92 


38 




49.95 




27.47 


45 




17.03 


38 


11.92 


30 



TYPE ANY LETTER TO SEE MENU? 



If “Manufacturing Approach” is chosen with a cost input of $1 1 .92, a price of $49.94 will be generated assuming all the other 
inputs are the same. 



* These columns have been left blank so the user can fill in the appropriate information per his requirements. 
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Program Listing 

2 REM* THIS PROGRAM CALCULATES DEALER NET, DEALER GM (% OFF LIST), WHOLESALE 
NET, WHOLESALE GM (% OFF LIST), MANUFACTURING COST AS A FUNCTION OF 
DISTRIBUTION CHANNEL COSTS, GIVEN THE DESIRED FACTORY GROSS MARGIN FOR A 
2 STEP DISTRIBUTION CHANNEL* 

5 CLS 

10 PRINT ’’ENTER REQUEST” 

12 PRINT ” 1. MARKETING APPROACH” 

14 PRINT ” 2. MANUFACTURING COST APPROACH” 

16 PRINT ” 3. END OF RUN” 

18 PRINT: INPUT "SELECTION”; R 

19 CLS 

20 ON R GOTO 22, 98, 174 

22 PRINT "MARKETING APPROACH" 

24 INPUT "LIST PRICE"; P 

26 INPUT "MAXIMUM (%) OFF LIST"; X 

28 INPUT "DEALER DISCOUNT PER BREAK (%)"; M 

30 INPUT "MAXIMUM (•%) OFF WHOLESALE NET"; Y 

32 INPUT "WHOLESALER DISCOUNT PER BREAK (%)"; T 
34 INPUT "MINIMUM MANUFACTURING GM (%)"; H 

36 INPUT "NUMBER OF QUANTITY PRICE BREAKS"; Q 

37 CLS: FOR N=1T063: PRINTTAB(N) : NEXT N 

44 PRINT "MODEL";' TAB (7) ; "LIST"; TAB (14) ; "ORDER" ; TAB (21) ;"DLR" ;TAB(27) ;"%"; 

46 PRINTTAB(31) ; "ORDER" ; TAB (38) ;"WHOLSLE " ;TAB(48) ; "%" ;TAB(53) ; "MFG" 

48 PRINT "DESP" ; TAB ( 7 ) ; "PRICE" ; TAB ( 1 4 ) ; "QUANT" ; TAB ( 2 1 ) ; "NET" ; 

50 PRINTTAB(26) ;"OFF";TAB(31) ; "QUANT" ;TAB (40) ;"NET" ;TAB(47) ;"OFF"; 

52 PRINTTAB(52) ;"COST" ;TAB(58) ;"%GM" 

54 PRINTTAB(8) ;"$";TAB(14) ; "UNITS"; TAB (21) ;"$";TAB(25) ;"LIST"; 

56 PRINTTAB (31) ; "UNITS" ; TAB (40) ; "$" ;TAB(47) ;"LIST";TAB(54) ;"$" 

58 FOR N=1T063 : PRINTTAB (N) : NEXT N 
64 A=X-(M*(Q-1) ) : B=Y-(T*(Q-1) ) 

66 IF A >X THEN 95 
68 IF B >Y THEN 95 
70 D=P*(1-A/100) 

72 D=D+. 005 : D=INT(D*100) /100 

74 W=D*(1-B/100) 

76 W=W+ . 005 : W=INT(W*100) /100 
78 C=P*(1-X/100) * (l-Y/100) * (l-H/100) 

80 C=C+. 005 : C=INT(C*100) /100 

82 G=(W-C)/W*100 

84 G=G+ . 5 : G=INT(G) 

86 PRINTTAB (7) ;P;TAB(20) ;D;TAB(26) ;A;TAB(37) ;W;TAB(46) ;B; 

88 PRINTTAB (51) ;C;TAB(56) ;G 
90 A= A+M : B=B+T 

94 GOTO 66 

95 INPUT "TYPE ANY LETTER TO SEE MENU"; A$: CLS 

96 GOTO 10 

98 PRINT "MANUFACTURING APPROACH" 

100 INPUT "COST"; C 

102 INPUT "MAXIMUM (%) OFF LIST"; X 

104 INPUT "DEALER DISCOUNT PER BREAK (%)"; M 

106 INPUT "MAXIMUM (%) OFF WHOLESALE NET"; Y 

108 INPUT "WHOLESALER DISCOUNT PER BREAK (%)"; T 

110 INPUT "MINIMUM MANUFACTURING GM (%)"; H 

112 INPUT "NUMBER OF QUANTITY PRICE BREAKS"; Q 

113 CLS 

114 FOR N=1T063 : PRINTTAB (N) : NEXT N 

120 PRINT "MODEL" ;TAB ( 7 ) ; "LIST" : TAB ( 14) ; "ORDER" ; TAB ( 2 1 ) ; "DLR" ;TAB(27) ;"%"; 

122 PRINTTAB (31) ; "ORDER"; TAB (38) ;"WHOLSLE";TAB(48) ;"%";TAB(53) ; "MFG" 

124 PRINT"DESP";TAB(7) ; "PRICE" ; TAB (14) ; "QUANT" ;TAB( 21) ;"NET"; 

126 PRINTTAB (26) ;"OFF" ;TAB(31) ; "QUANT"; TAB (40) ; "NET" ;TAB(47) ;"OFF"; 

128 PRINTTAB (52) ; "COST" ;TAB(58) ;"%GM" 

130 PRINTTAB (8) ;"$";TAB(14) ; "UNITS" ;TAB( 21) ;"$";TAB(25) ;"LIST"; 

132 PRINTTAB (31) ; "UNITS"; TAB (40) ;"$" ;TAB(47) ;"LIST";TAB(54) ;"$" 

134 FOR N=1T063 : PRINTTAB (N) : NEXT N 
140 A=X-(M*(Q-1) ) : B=Y-(T*(Q-1)) 

142 IF A>X THEN 171 
144 IF B>Y THEN 171 

146 D=(C*(1-A/100) ) / ((l-X/100) * (l-Y/100) * (l-H/100)) 

148 D=D+.005: D=INT(D*100) /100 

150 W=D*(1-B/100) 

152 W=W+.005: W=INT(W*100) /100 

154 P=C/( (l-X/100) * (l-Y/100) * (l-H/100)) 

156 P=P+.005: P=INT(P*100)/100 

158 G=(W-C)/W*100 

160 G=G+. 5 : G=INT(G) 

162 PRINTTAB (5) ;P;TAB(17) ;D;TAB(25) ;A;TAB(37) ;W;TAB(46) ;B; 

164 PRINTTAB (51) ;C;TAB(56) ;G 
166 A=A+M: B=B+T 

170 GOTO 142 

171 INPUT "TYPE ANY LETTER TO SEE MENU"; A$ : CLS 

172 GOTO 10 
174 END 



TERMINALS FROM TRANSNET 



OUTRIGHT PURCHASE OR FULL OWNERSHIP 
UNDER OUR 24 MONTH 100% EQUITY RENTAL PLAN 



DESCRIPTION 



PURCHASE 

PRICE 



‘PER MO. 
24 MOS. 



LA36 DECwriter II 


$1,695 


. $90 


LA34 DECwriter IV 


1,095 .. 


59 


LA34 DECwriter IV Forms Ctrl. 1,295 . 


. 69 


LAI 20 DECwriter III KSR 


2,495 ., 


. 140 


LA180 DECprinter 1 ..... 


2,095 ., 


, 117 


VT100 CRT DECscope ... 


1,895 .. 


101 


VT132 CRT DECscope ... 


2,295 .. 


122 


DT80/1 DATAMEDIA CRT 


1,995 .. 


106 


TI745 Portable Terminal . 


1,595 .. 


85 


TI765 Bubble Mem. Term. 


2,595 .. 


146 


TI810 RO Printer 


1,895 .. 


101 


TI820 KSR Printer 


2,195 .. 


117 


TI825 KSR Printer 


1,595 .. 


85 


ADM3A CRT Terminal ... 


875 .. 


47 


ADM31 CRT Terminal ... 


1,450 .. 


78 


ADM42 CRT Terminal ... 


2,195 .. 


117 


QUME Letter Quality KSR . 


3,295 .. 


176 


QUME Letter Quality RO . 


2,895 .. 


155 


HAZELTINE 1420 CRT ... 


945 .. 


51 


HAZELTINE 1500 CRT ... 


1,195 .. 


64 


HAZELTINE 1552 CRT ... 


1,295 .. 


69 


Hewlett-Packard 2621 A CRT 


1,495 .. 


80 


I Hewlett-Packard 2621 P CRT 


2,650 .. 


142 


‘FULL OWNERSHIP AFTER 24 MONTHS 


1 2 MONTH FULL OWNERSHIP, 36 MONTH LEASE 


AND RENTAL PLANS AVAILABLE ON ABOVE AND 


OTHER EQUIPMENT 





MOST EQUIPMENT AND OPTIONS 
IN STOCK FOR IMMEDIATE SHIPMENT 



M TraivsNet 

CORPORATION 

201-688-7800 

TWX 710-985-5485 

1945 ROUTE 22, UNION, N.J. 07083 
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. . . WordMagic II . . . 

Powerful, Versatile . . . 

Word Processing for the TRS-80* 
Model II (64K). 
WordMagic II features: 

• Total TRSDOS* compatibility 

• Automatic WRAPAROUND — no 
need to hit ENTER key on Text Entry 

• Automatic MARGINATION 

• Print Formatting — Automatic Pagi- 
nation, Vertical Margins, Page Num- 
bering & Line Numbering 

• Creates Mail List, Labels, Personal- 
ized Form Letters 

• Full Edit Commands — Global Sub- 
stitution, Insertion, Find, etc. 

• Automatic Generation of a Table of 
Contents 

• Smooth Right, Centering, Left Justify 

• Memory Buffer 

• Documents up to Diskette Size 

• Easy to Use Command Structure 

• Complete User’s Manual 

• Indentation 

• Variable Form Lengths 

Complete package (Diskette and 
manual) $195. Manual only $20. 

(Calif, residents please add 6% Sales Tax) 

CalData Systems • P.O. Box 1 78446 
San Diego, CA92117 
(714) 272-2661 

* TRS-80 trademark of Tandy, Corp. 
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Using Moving Averages 
to Track Stock Prices 



BYE.D. SHAFER 



A nyone looking at the chart of the Dow Jones Industrial 
Average in the Wall Street Journal each weekday can 
spot low points recurring at relatively uniform time periods. 
(See, for example, Chart 1.) These lows correspond to the 
daily cycles to which the Dow responds. Looking further at a 
chart with weekly prices (Chart 2), you can see other lows, 
only this time they occur weeks instead of days apart. If you 
know the frequencies of the most dominant of these cycles 
and are able to identify when they last occurred, you can 
determine when the cycles should repeat. 

Some of the more prominent cycles you can use for trading 
in the stock market are: 54 month, 18 month, 6 month, 3 
month and 7 week. The 54 month cycle has been evident for 
several decades. It was especially obvious in 1962, 1966, 
1970 and 1974. It was not so obvious in 1978 but a low did 
occur in March 1978 which has not been exceeded. This 
cycle conforms with the well known bull-bear cycle that 
market buffs speak of so much. 

Moving Averages and What They Do 

A moving average is a statistical tool for smoothing data. It 
is calculated by summing a number of items in a series and 
dividing by the number of items summed. For example, if 
you wanted to calculate a moving average of seven items in a 



Mr. Shafer is a research analyst with the state of California. 
He authors a weekly newspaper column , “Winning on Wall 
Street y ” in which he discusses methods of successfully in- 
vesting in the stock market and using cycle analysis to im- 
prove timing. 



series of 10 items, you would add the first seven items and 
divide by seven to get the first average. You would then drop 
the first item in the series and add the eighth to the previous 
total and again divide by seven. This would give the second 
average. For the third average you would drop the second 
item and add the ninth. Thus, you’d be moving the average 
along the number series until you ran out of data. 

If a moving average is calculated with a span that equals 
one of the market cycles such as the three month cycle (13 
weeks), the average will reduce to zero any fluctuation in 
price due to the 13 week cycle and will at the same time 
suppress all smaller cycle influences significantly. What 
would be revealed is the effect of the sum of all larger cycles 
present in the market prices. A moving average with a span of 
13, when plotted on a price chart of the Dow Jones Industrial 
Average, will reveal the influence of the six month plus 18 
month plus 54 month plus any other cycles between or 
greater than these. 

Another valuable feature of a moving average is that it cuts 
right through the middle of the price action of the next larger 
cycle than the one for which it is calculated*. Thus, a 13 week 
moving average will cut through the prices affected by the 26 
week (six month) cycle when it is plotted properly. 

Keep in mind that each average that you calculate is a 
number that represents the central point of a time series. If 
you calculate a moving average with a span of 13 weeks, 
each calculation represents a typical price for the 13 week 
period and should be plotted at the middle of that time period 
(seven weeks back). When plotted in this manner the line that 
is formed will be found to bisect the data. 



1970 

MARCH APRIL MAY 1972 

6 13 20 27 3 10 17 24 1 8 15 22 29 
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Using the TRS-80 

Before I bought my TRS-80 Level n, 16K computer I had 
to calculate moving averages using a hand-held calculator. If 
I were to be concerned with just one cycle and only with the 
recent past the old hand-held “four-banger” would do just 
fine. However, I am a market advisor and researcher and 
need the capability to look at stocks, commodities, options 
and indices both currently and historically. 

My problem at the time I purchased the TRS-80 was that I 
didn’t know how to program a computer and no tailor-made 
programs existed. So, I had to learn to program in Basic and 
then to debug my programs. This took some time but eventu- 
ally I worked out a satisfactory program to calculate four 
basic moving averages — seven week, 13 week, 21 week and 
39 week — which would reveal the most important market 
cycles and display them on the screen or print them out on my 
Radio Shack Quickprinter a year at a time. 

Simplified Moving Average Calculations 



ing average you are interested in. For example, if you want to 
calculate a 39 week moving average to see the effect of the 1 8 
month and 54 month cycles on market prices, the smoothing 
factor would be .05 (2/(39+ 1) = 2/40 = 1/20 = .05). 

To start the process you would use the first data item as the 
previous average and calculate the second average (the 
second data item minus the first data item) as multiplied by 
the smoothing factor. The product would then be added to the 
first data item. 

Using 800 as the first item, 820 as the second, 830 as the 
third item, and .05 as the smoothing factor the results would 
be: 



ITEM# 


VALUE 


MA39 


EXPLANATION 


1 


800 


800 




2 


820 


801 


800 4 .05 (820 - 800) = 800 + .05 (20) 
=800 4 1 = 801 


3 


830 


802* 


801 4 .05 (830 - 801)= 801 4 1.45 = 
802.45 



In recent years, a process called “exponential smoothing” 
has become popular as a substitute for the traditional method 
of calculating moving averages. While the method I de- 
scribed previously is simple, it requires the use of several 
memory cells to keep track of all the data being calculated. 
Exponential smoothing requires holding only the smoothing 
factor, the previously calculated average and the latest data 
item. 

Here’s the algorithm for exponential moving averages: 
Smoothing Factor = 2/(p +1) 
p = the span of the moving average 
New Average = Previous Average + (Smoothing Factor 
X (Latest Data — Previous Average)) 

The smoothing factor is determined by the span of the mov- 



* Rounded to the nearest integer 

Moving Average Program 

Line 5 clears 100 memory cells to allow the use of 
STRINGS in line 150, which calls for 63 dashes. The com- 
puter clears only 50 cells on start-up. Also on this line 
variables E, I, L, N, P, X and Y have been defined as 
integers. 

Line 10 arrays A( ), B ( ), C( ), D( ), V( ) have been 
dimensioned to 53 to account for the years which contain 53 
weeks of data. Line 20 allows for averages to be calculated 
for less than a year. Line 30 is an error trap. 

Line 60 initializes the first “averages” equal to the first 
value. This is necessary for the first treatment of the data but 



Program Listing 

1 EXPONENTIAL MOVING AVG. PROGRAM 

2 ' BY E. D. SHAFER, RANCHO CORDOVA CA. 

3 ' MARCH 1,1980 

5 CLEAR! @8 : DEF I NT E, I , L, N, P, X, V : L=53 
18 DIM A<L>, B<L>, C<L>,D<L>, VCL> 

28 INPUT "HOW MANY ENTRIES<3-53>"; E 
38 IF E<3 OR E>53 THEN 28 
48 INPUT” ENTER YEAR".; V 
58 INPUT “ENTER FIRST VALUE”; V<1> :CL5 
68 AC1>=VC1> :B(1)=V<1) : 

CC1>=V<1> :D<1>=V<1> 

62 INPUT” IS THIS RUN ONGG I NG < Y/N > " ; 

64 IF LEFTT'B*, 1>="Y" GOSUB 588 
70 FOR N-2 TO E:P=CN-1> 

88 INPUT “ENTER NEXT VALUE”; V<N> : CLS 
38 ACN>=INT<ACP>+. 25*<V<N>-B(P> >+ 5> 
180' B<N>=INT <B(P>+. i4*<V<N>HB<P>>+ 

118 C<N> = INTCCCP>+ 03*<V<N>~C<P>>+. 5> 
128 D<N>=INT<DCP>+. 05*<V<N>HCKP>>+. 5> 
130 NEXT: PRINT TAB<38>Y 
148 PR I NT T AB 1 8 > ” WEEK “ ; TAB < 13 > ” VALUE “ ; 
TAB<26> "MR— 7"; TRB<38>”MA13 U ; 

T RB < 43 > ” MA21 “ ; T AB < 53 > ” MA33 " 

158 PRINT STRING$<63, ”-”>:X=l 
168 FOR I=X TO X+ll 
178 PRINT TAB<1>I;TBB<13>V<I>; 
TAB<26>A< I >; TAB<38>BC I >; 

TAB<43>C< I >; TABC53>D<I>; 



188 IF J=E THEN 218 
185 NEXT 

198 I NPUT “ PRESS ENTER TO CONTINUE"; 2 

200 X=X412 : CLS : GOTO 168 

218 PRINT: INPUT "PRINT RESULT S < Y/N > " ; R$ 

228 IF LEFT % < AT, 1 > = " Y “ THEN 248 
238 END 

248 LPRINT CHR$ < 31 > : LPR I NT TAB<6J>Y 
258 LPRINT CHRS C 38 >: LPRINT CHR*C15> 

26© LPRINT TAB<8> "WEEK"; TAB<6> "VALUE”; 
TAB<13> “MA-7 ”; TAB<13> "MA13"; 

TAB<25> ” MB21 ” ; ThB<31>"MA33" 

278 LPRINT CHR*<14> 

280 FOR 1=1 TO E 

238 LPRINT TRB<1> I; TABC7>V< I >; 

TAB<13>AC I >; TAB<13>BC I >; 

TAB < 25 > C <1 > ; T AB C 31 > D CI> 

388 NEXT: END 

580 PRINT "TO CONTINUE WITH A NEW YEAR" 

51© PRINT"ENTER THE LAST AVERAGES FOR MR~7 U 
528 PRINT "MA13, MA21, AND MA33” 

538 PRINT "FROM PREVIOUS YEAR" 

548 INPUT "ENTER LAST MA— 7”; A<8> : CLS 
558 INPUT “ENTER LAST MA13”; B<8> : CLS 
560 I NPUT "ENTER LAST MA21 ,S ; C< 8> : CLS 
578 I NPUT ” ENTER LAST MA33"; D<8> : CLS 
588 R<1>=INT<A<0>+. 25^CV(1>-A<8»+ 5> 

538 BC1>=INT<B<8>+ 14*CV<1>-B<0> >+. 5> 

688 C<1> = INT CCC0>+. 83^<V<1>~CC0>>4. 5> 

618 D<!>=INT<D<0>+. 85^CVC1>-D<8>>4. 5> 

628 RETURN 
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will not be used for ongoing calculations beyond the first 
year. It will take as many calculations as the span of the 
moving average before the “correct” average will be 
derived. For example, a span of 39 will require 39 calcula- 
tions before the proper moving average will result. When you 
rerun the program for a subsequent year you don’t want to 
throw away data in this fashion so I have inserted lines 62 and 
64 to avoid this problem. Lines 62 and 64 set up a subroutine 
to allow the last averages from the previous run to be input. 

Lines 70 through 130 provide a loop for inputting the data 
and calculating the four moving averages as the data are 
input. Lines 130 through 150 set up table headings. Lines 
160 through 185 provide a loop to print to the screen 12 lines 
of data. 

Line 190 stops the screen scroll until data have been 
transcribed. Pressing “Enter” sets up the process again for 
the next 12 lines of data, and so forth, at line 200. 

Line 180 escapes the loop when all the data have been 
calculated and calls for a decision to print results or to end the 
program. At this point the remainder of the program can be 
eliminated if you don’t have a printer. For those with a line 
printer, modifications may be needed in the program to 
account for different types of commands. I have a Radio 
Shack Quickprinter and the program is coded to use that 
printer’s requirements. 

Line 240 sets the size of type to 20 characters per line 
(CHR$ (31)) and prints the year in that size. Line 250 resets 
the type size to 40 characters per line (CHR$ (30)) and sets up 
an underline feature (CHR$ (15)). 

Line 260 prints the headings for the table and underlines 
them. Line 270 turns off the underline feature (CHR$ (14)). 
Lines 280 through 300 print out all the data using a FOR/ 
NEXT loop. Lines 500 through 620 contain the subroutine for 
continuing calculations beyond the first year. 

Be sure, when plotting these moving averages, to move 
each average back one half span on the charts. The seven 
week average should be plotted at the fourth week back; the 
13 week average, seven weeks back; the 21 week average, 1 1 
weeks back; and the 39 week average, 20 weeks back. When 
this is done you’ll notice that the average bisects the prices 
according to the cycles it is revealing. 

I suggest you plot only one average span per chart and then 
create an upper and lower channel boundary to the price 
display by plotting lines vertically equidistant from the aver- 
age which encompass the highs and lows. You will thus have 
a channel within which the prices have historically fluctuated 
and within which they should continue to move in the near 
future. 

Anyone who would like to discuss either the program or 
the moving average analytical techniques in further detail can 
write to me c/o Personal Computing , 1050 Commonwealth 
Ave., Boston, MA 02215. □ 



Sample Run 

19S© 



WEEK 


VALUE 


MR— 7 


MA13 


Mfi2i 


MA33 


1 


826 


832 


834 


838 


841 


2 


847 


836 


836 


833 


841 


3 


868 


844 


840 


842 


842 


4 


875 


852 


845 


845 


844 


5 


881 


853 


850 


848 


846 


6 


884 


865 


855 


851 


848 


7 


837 


873 


861 


855 


858 


8 


874 


873 


863 


857 


851 


y 


861 


879 


863 


857 


852 



MARK GORDON 

COMPUTERS 

DIVISION OF MARK GORDON ASSOCIATES 
15 KENWOOD ST., CAMBRIDGE, MASSACHUSETTS 02139 
(617) 491-7505 



SORT-80 

Produced exclusively for 
Mark Gordon Computers by SBSG 

TRS-80* disk files may be sorted and merged 
using SORT-80, the general purpose, machine 
language, sort program. Written in assembly 
language for the Z-80 microprocessor, it can: 

— Sort files one disk in length 

— Sort Direct Access, Sequential Access and 
Basic Sequential Access files 

— Reblock and print records 

— Recontrol files from disk 

— Be executed from DOS 

— Be inserted in the job stream 

— Allow parameter specification 

• input/output file specification 

• input/output record size 

• lower/uppper record limit 

• print contents of output file 

• input/output file key specifiers 

The minimum requirement is a 32K TRS-80* Level 
II computer with one disk drive or a single drive 
Model II computer. It will operate on 35, 40 and 77 
track drives, and has been tested on TRSDOS 
2.1 , 2.2, 2.3, NEWDOS 2.1 , 3.0, and VTOS 3.0.1 . 
It is compatible with most machine language 
printer drivers. Sort time is fast: for example, a 32K 
file will sort in approximately 40 seconds. $59. 

InfoBox is the easiest-to-use information 
manager available for the TRS-80*. It’s ideal for 
keeping track of notes to yourself, phone 
numbers, birthdays, inventories, bibliographies, 
computer programs, music tapes, and much 
more. This fast assembly language program lets 
you enter free-format data, variable length items 
and lets you look up items by specifying a string of 
characters or words that you want to find. You can 
also edit and delete items. Items entered into 
InfoBox can be written to and read from cassette 
and disk files. All or selected items can be printed 
on a parallel or serial printer. InfoBox occupies 3K. 
Specify cassette or disk version. Special intro- 
ductory price $24.95 until June 1 5; $29.95 after. 




*TRS-80 is a Tandy Corp., Trademark 
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How to write for 
Personal Computing 



You’ve written the programs we want to publish. 

You - the Personal Computing readers - are using 
your computers in businesses, homes, offices and 
schools. Other readers, just as software-hungry as you, 
are eager to try out your programs, your applications 
and your techniques. So why not share what you’ve 
done by submitting an article to PC? 

It’s easier than you might think. Remember: we’re 
more interested in practical programs and useful ap- 
plications than in fancy prose. And our editorial staff 
stands ready to help with any problems you encount- 
er in writing your article; just give us a call at (617) 
232-5470. 

Here are some handy guidelines to help you get 
started. 

First, decide what kind of article you want to 
write. Do you have a business program that will help 
an executive, salesman, doctor, lawyer or shopkeeper 
function more efficiently? Think about how business- 
es can benefit from microcomputers — not only in the 
obvious areas of inventory, accounting and payroll, 
but in all departments and levels right up to the presi- 
dent’s desk. Financial and marketing analysis, time 
management, planning, material handling, product de- 
sign and cost accounting are areas ripe for creative 
programming. 

How do you use your computer for home and per- 
sonal applications in your living room, kitchen, study 
or den? Again, think beyond the obvious areas of 
checkbook balancing and budgeting (though these 
areas are far from exhausted) to other applications. 
Hobbies, home management, household inventory, , 
gardening and landscaping, personal income and ex- 
pense analysis, personal mailing lists and word pro- 
cessing are just a few ideas to spark your imagination. 

What education programs have you written for 
children, adults, professionals, businessmen and 
teachers? Computers can not only teach children basic 
subjects such as spelling, math, geography, economics, 
civics, grammar, literature and science, but can help 
adults review or sharpen skills in these areas as well. 
How else can computers function in or out of the 
classroom to aid learning? To help teachers and ad- 
ministrators? 

Are you proficient in some programming tech- 
nique or special computer area you could explain in 



a tutorial article ? How do you save time, money, com- 
puter memory or frustration when programming or 
using your computer? Others can benefit from the 
same techniques you use. 

Computer games, history , humor and fiction are 
other areas rich in article and story ideas. 

Your second step is to write the text of the article. 
Remember, readers aren’t familiar with your program. 
So explain in detail what the program does and how it 
does it. Include here the overall structure of your pro- 
gram as well as any special algorithms or routines 
you’ve used. Give suggestions for modifying or ex- 
panding the program for other applications, other 
businesses or other situations. 

Third, prepare your supporting documentation. In- 
clude at least a program listing and one or two sample 
runs, and add program notes to explain any special 
commands used or other special features of your pro- 
gram. Use charts, diagrams, figures and photos if they 
help explain your program and its use. 

Finally, mail your manuscript. Address it to: Don 
Wood, Managing Editor, Personal Computing Maga- 
zine, 1050 Commonwealth Ave., Boston, MA 02215. 

A few suggestions: All submissions should be origi- 
nal, typed (i not all CAPS), double-spaced and neat. 
Please include your name and address on the first page 
of the article and enclose a self-addressed, stamped 
envelope for return of material. 

Since we photograph program listings and sample 
runs exactly as you send them to us for publication 
in the magazine, please be sure you use a fresh ribbon 
for computer printouts. If you don’t have a printer, 
you can type your listings single spaced; but again, be 
sure you use a new ribbon. (If your program relies 
heavily on graphics, you can photograph sample runs 
from your CRT. But take care to avoid distortion due 
to the curve of the screen.) 

Feel free to call us if you have any questions or 
want to discuss specific ideas. We can give you feed- 
back and suggest appropriate slants and approaches. 

We’re always looking for fresh, original ideas. While 
these guidelines will help you in preparing material for 
Personal Computing , don’t assume we don’t want your 
idea just because it’s not mentioned here. Let us and 
our readers know what_yow doing with your com- 
puter. 
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Problem Solving and Computers 



r 






-BY DAVID LUBAR 



P roblem solving and computers? While this seems 
like a connection that is too obvious to mention, 
there are times when users overlook the problem-solving 
potential of their micros. Consider the following situa- 
tion: In the middle of writing a program, you encounter 
a snag which sends you to the manuals in search of 
information. The answer might not be there, or it might 
be so well buried in a footnote that your quest begins to 
resemble a snark humt. There is an easier approach. 
Let the computer provide the solution. 

This article covers two topics; getting the computer 
to solve problems about itself, and solving the problem 
of how to get the computer to solve problems about 
itself. (If you made it through that, the rest is easy.) 

First, a simple example using a FOR/NEXT loop. 

100 FOR 1=1 TO 10 
1 10 IF MID$(X$,1, 1)=“P” THEN 140 
130 NEXT I 
140 SCORE=I*5 

Here, if P is found, the value of I at that point is used 
to assign a value to the variable SCORE. But what if P 
isn’t found? Will the value of I be 10 or 1 1 ? (You might 
already know the answer to this; I said it was simple.) 

Rather than search the manuals, you can get the 
answer with a short program. What would the program 
be fike? First, it would contain a loop, since that is the 
function being investigated. And there would be a line 
which prints the value of the loop variable after the 
loop is finished. This would do the job: 

10 FOR 1=1 TO 10 
20 NEXT I 
30 PRINT I 

After one RUN, you have the answer. To develop an 
overall approach to problem solving, we’ll look at a 
number of questions and their solutions. The problems 
can be divided into two types: 

1 . What will the computer do with this data? 

2. What will happen when the computer performs 
these commands? 

In most cases, the approach will be to set up the 
situation under question along with lines to print the 
required information. 

Problem: To change the sign of a variable, do you 
have to multiply the variable by - 1? 

Y ou know that X= — 1 *X will change the sign of X. 
Will X = —X do the same job? A short program sets up 
the situation and prints the result. 

10 X=5 
20X=— X 
30 PRINT X 

This program will provide the answer. What if X 
starts out with a negative value? If you don’t know the 
answer, use the above approach to find out. 

When more than one variable is involved, the pro- 
cess is basically the same. The only difference is that 



more output is needed. In such cases, the output should 
be organized in an understandable manner. The fol- 
lowing example demonstrates this point. 

Problem: How accurate is your computer? 

You probably know a bunch of specifics such as the 
length of floating point numbers in your system. But, 
in a practical application, what sort of accuracy can 
you expect? A quick way to test pocket calculators is to 
take the square root of a number, and then square the 
result. Will the value lost going one way be regained 
going the other way? And will the magnitude of the 
number make any difference? 

The squared square-root test can be applied to a 
computer. Again, the first step is to set up the function 
you want to investigate. Since many values will be 
checked, a loop would come in handy. Setting up the 
function in a loop, we get: 

10 FOR 1=2 to 1000: REM THE END VALUE DEPENDS 

ON YOUR PATIENCE AND CURIOSITY. 
20X=(SQR(I)A2 

Now, the data has to be produced in a meaningful 
way. We want to see each number, and see the result of 
squaring its square root. Columns can usually be used 
to give a readable output. 30 PRINT I,X 

So the numbers won’t fly by, add a delay loop. And, 
to further increase readability, you can add a blank line 
between printouts. 

40 FOR J= 1 TO 200: NEXT J: PRINT 
50 NEXT I 

Using this program, you can find out how your 
machine treats this calculation, and see whether large 
numbers are handled in a different manner. 

The above program can be refmed slightly. Since 
numbers which are perfect squares will obviously re- 
turn integers in the above function, the data could be 
confusing. To remove such numbers, add the line: 

15 IF SQR(I) = INT (SQR(I)) THEN 50 

If your test program deals with several variables, 
you might want to add lines such as: 100 PRINT 
“X=”;X or 100 PRINT “THE VALUE OF THE INITIAL 
VARIABLE IS ”;X. 

One more idea: If the test program uses a number of 
variables, and each variable will be tested for several 
values, time can be saved by using “constants. ” The 
pseudo-constants will be used to give values to the test 
variables. For example: 

10 A=5: B=7 
20 X=(A*B)/A .+ (A*B)/B 

To test different values, just change the first line. To 
stray from the topic for a moment, it should be men- 
tioned that this technique is a great time saver when 
you are developing a program. Say, for example, you 
are trying to format printout. Rather than having a 
number of lines with the statement TAB (7), and 
changing all these lines whenever you want to try a 
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Novice’s Notebook 



Novice’s Notebook 



W 



different setting, just use TAB (T). In this way, 
different TAB settings can be investigated merely by 
changing the value of T. (Note to Apple users: In a 
large lores graphics program, use COLOR=A, 
COLOR=B, and so on. This simplifies the process of 
finding the right color combination.) 

Let’s look at some problems that don’t involve data. 
What happens if a program ends in a subroutine? For 
example: 

10GOSUB 100 

100 REM REST OF PROGRAM IS HERE 

Call the first subroutine A. Now, A can also contain 
GOSUBs, which, on RETURN, will give control back to 
A. But if the number of GOSUBs in A equals the 
number of RETURNS, the program will end without 
going back to the original GOSUB. If such a program is 
RUN more than once, will the lack of that final 
RETURN cause the program counter to overflow, or 
cause some sort of error message? 

The best way to find out is with a short program. 

10 GOSUB 20 

20 PRINT “A”: REM USE A PRINTOUT TO 
SEE WHEN THE PROGRAM REACHES THIS POINT 
RUN this a number of times. Or, if your Basic allows, 
add 30 RUN. Then sit back for a while and see if an 
error occurs. 

What will your machine do if it expects a numerical 
input but gets a letter, or vice versa? What happens if a 
loop variable is given a new value inside the loop? 
Don’t go to the manual. Find out from the computer. 

Problem: When is a line really lost? 

If you type 100, followed by a return, any former 



line 100 will no longer LIST. But has the line been 
removed from memory? In this case, a simple program 
won’ t provide the answer. But a simple technique will. 

Start with nothing in memory (turn the power off for 
a few seconds). Enter a line with a single statement, 
such as: 10 PRINT “TEST”. 

After this, enter the monitor. (If your machine 
doesn’t allow access to the monitor, use a loop that 
PRINTs a series of PEEKs.) Somewhere right below 
HIMEM will be a series of numbers representing the 
line of Basic (it should stand out since it will be 
surrounded by nothing but 00s or FFs.) Write this 
series down. Now, go back to Basic and erase the line 
by typing its number followed by a return. Check the 
monitor again. Are the original numbers still there? If 
not, the line is really gone. If the numbers are still 
there, or are there with some small changes, then the 
line isn’t lost. Some actions will definitely erase lines 
(turning off the power is one example), other actions 
just change the pointers to a line or alter some of the 
data in the line. Try the above technique with NEW, 
DEL, and any other commands you can think of. Then 
see if the line is really lost. 

Since there are a large number of ways in which 
commands and data can be combined, and a limit to the 
amount of documentation that a vendor can provide, 
questions are bound to arise for which the answers 
aren’t readily available. But, by setting up the right 
kind of program, you can find the answers. The solu- 
tion might provide you with a new shortcut or trick to 
add to your Basic repertoire. Don’t let your computer 
lie idle while you search through manuals. □ 
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Gash in on the Power of Pascal 



A re there a few “old” (1964 and 
earlier) U.S. silver coins stashed 
somewhere around your house? Maybe 
in a Mason jar or piggy bank? If so, you 
are likelier a little richer than you sup- 
pose. Recent spot market prices for sil- 
ver have topped out above what gold 
was selling for just a few years ago. As 
a result, many U.S. coins, when sold 
for their meltable silver content, yield 
surprisingly high returns compared to 
their nominal face value. Even a 1963 
dime will bring you up to $1.43 in melt 
value when silver is $20 an ounce. And 
silver recently has been up around the 
$40 mark! 

Silvercoin, a program in the ele- 
gantly structured UCSD Pascal lan- 
guage, nicely demonstrates Pascal’s 
computing power and syntax and, in 
addition, can help you mine the gold in 
them thar silver coins! 

This program deals with the “melt 
value” of the coins entered as data. It 
does not deal with the numismatic value 
of interest to coin collectors. (You will 
find an excellent program on “Coin 
Collecting” by Charles D. Sternberg in 
the October 1979 issue of Personal 
Computing.) Silvercoin is based on the 
official weights of silver content pub- 
lished in the 1980 guide of the 
American Numismatic Association. 

To run the program, first gather your 
coins in a stack — only those coins of 
1964 and earlier vintage (of any denom- 



Mr. Gaylord is a copy chief in a San 
Francisco ad agency. 



BY SAM GAYLORD 

ination), half-dollars minted between 
1965 and 1970 inclusive, and silver 
dollars of any date. On a worksheet list 
the coins, each by face value and date. 
The order does not matter. For instance 
you might have eight coins and list 



them as follows: 




10 


1963 


25 


1959 


50 


1967 


50 


1960 


100 


1971 


5 


1948 


10 


1963 


25 


1961 



Note that silver dollars are entered as 
“100”. In this manner list the entire 
collection of coins whose melt value 
you wish to have computed. Now you 
are ready to turn the job over to your 
microcomputer. 

With your computer on and Pascal 
up and running, press “X” in the 
command mode and when the screen 
displays “Execute what?” type “Sil- 
vercoin” and then simply interact with 
your computer according to the pro- 
gram prompts that will be displayed. 
The initialization procedure (routine) 
asks whether you want hard copy or 
not; a “yes” reply will provide you a 
printout of results (see Sample Runs). 
Next you will be asked the total number 
of coins being run, and the current spot 
silver price. The latter can be found in 
the financial pages of your local news- 
paper or by phoning your bank or 
brokerage office. 



Next you will be asked to list the 
coins as described earlier, first being 
reminded that the program is “valid 
only if coins of 1964 and earlier vin- 
tage, unless half-dollars between 1965- 
70 or dollars of whatever date. ” 

Now Pascal goes to work and, no 
matter how few coins you have, you are 
subject to a rather pleasant discovery — 
that inflation works two ways! 

If you are a relative newcomer to 
Pascal, a study of the source text in the 
Program Listing can be enlightening. 
My own computer is the Apple II Plus 
with language card (48K bytes of RAM 
on board) and is interfaced to a Trend- 
corn 100 scratch printer which I use 
primarily for listing programs and for 
debugging. Pascal encourages the divi- 
sion of lengthy, complex computing 
tasks into compact subroutine blocks 
(procedures and functions). In this pro- 
gram I used six procedures, each per- 
forming a specific task. Note, too, that 
Pascal lends itself to the use of mne- 
monic names and identifiers. “List- 
data,” “Accumulate,” “Addface- 
value,” and “Summarize” are ex- 
amples in my program. The main pro- 
gram invokes these procedures as sub- 
routines; the procedure calls utilizing 
the procedure names. This makes it 
easier for other programmers to follow 
the thread of the text. 

Try this Pascal program on your own 
computer; discover the riches in this 
sophisticated computer language. 
What’s more, discover the riches hid- 
den in that coin bank or Mason Jar! □ 



Sample Run 



COIN 


DATE 


0Z. SILVER 


MELTUALUE 


DIHE 


1962 


6.072 


3.62 


QUARTER 


1956 


0.191 


8.05 


DOLLAR 


1975 


0.308 


12.99 


HALFD0LLAR 


1966 


0. 149 


6.29 


HALFD0LLAR 


1944 


0.356 


15.03 


QUARTER 


1953 


0. 191 


9.05 


TOTALS 




1.266 


53.42 



NOTE: SILVER Hi * 42.19 PER OZ. 

$ 2.60 TOTAL FACEUALUE 



COIN 


DATE 


0Z. SILVtR 


MELTUALUE 


NICKEL 


1972 


HI N I HUH 


NONE 


DIHE 


1944 


8.072 


2.37 


DOLLAR 


1978 


0.308 


10.22 


HALFD0LLAR 


1967 


0.149 


4.95 


HALFD0LLAR 


1944 


0. 356 


11.81 


HALFD0LLAR 


1962 


8.356 


11.81 


QUARTER 


1946 


0.191 


6.33 


TOTALS 




1.432 


47.49 



H0TE: SILVER AT $ 33.17 PER U2. 

$ 2.90 TOTAL FACEUALUE 
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Program Listing 



(*$S+*) 

PROGRAM COINSILVER, 

VAR COIN: ARRAY (1. .100] 

OF RECORD 

DENOMINATION: 10. .100; 

DATE : 1 9 0 0 . .1980; 

MELTVALUE : REAL ; 
SILVERWEIGHT : REAL 
END; 

SILVERPRICE , TOTALVALUE , 

WE I GHTTOTAL , FACEVALUES : REAL ; 

K , TOTALCOINS : 1 . .100; 

P : TEXT ; S : STRING; 

PROCEDURE INITIALIZE; 

VAR REPLY : STRING ; 

BEGIN 

WRITELN ; 

WRITE ( 'WANT HARD COPY? ' ) ; 

READ (JREPLY) ; 

IF REPLY= * YES 1 THEN 
REWRITE (P, 'PRINTER: ') 

ELSE REWRITE (P, 'CONSOLE: ') ; 
WRITELN; 

WRITE ('TOTAL NUMBER OF COINS? '); 
READ (TOTALCOINS) ; 

WRITE ( 'CURRENT SILVER PRICE? '); 
READ (SILVERPRICE) ; 

WRITELN; 

WRITELN ('VALID ONLY IF COINS OF 19 

64') ; 

WRITELN ('AND EARLIER VINTAGE, UNLE 

SS ' ) ; 

WRITELN (' HALFDOLLARS BETWEEN 1965- 

70’) ; 

WRITELN ('OR DOLLARS OF WHATEVER DA 

TE ' ) ; 

WRITELN; 

WRITELN (' ENTER DENOMINATION (IN CE 
NTS) ' ) ; 

WRITELN ( 'FOLLOWED BY MINT DATE'); 

K : =1 ; TOTALVALUE : = 0 ; 

WEIGHTTOTAL : =0 ; FACEVALUES : =0 
END; 

PROCEDURE ACCUMULATE ( SWT, MVL: REAL) ; 
BEGIN 

WEIGHTTOTAL : =WE I GHTTOTAL+S WT ; 
TOTALVALUE : =TOTALVALUE+MVL 
END; 

PROCEDURE ADDFACEVALUE(D: INTEGER) ; 
BEGIN 

FACEVALUES : =FACEVALUES+D 
END; 

PROCEDURE SUMMARIZE; 

BEGIN 

WRITELN (P, ' 

) . 

WRITELN (P, 'TOTALS' , WEIGHTTOTAL : 2 0 : 
3 , TOTALVALUE : 12 : 2 ) ; 

WRITELN (P) ; WRITELN (P) ; WRITELN (P) ; 
WRITELN (P,' NOTE: SILVER AT $',S 
ILVERPRICE : 1 : 2 , ' PER OZ . ' ) ; 

WRITE (P, ' $ ' , FACEVALUES/10 

0:1:2,' TOTAL FACEVALUE ' ) ; 

WRITELN (P) 

END; 



PROCEDURE HEADING; 

BEGIN 

PAGE (OUTPUT) ; WRITELN ; 

WRITELN ; WRITELN (P) ; 

WRITELN (P , ' COIN DATE OZ . S 

ILVER MELTVALUE ' ) ; 

WRITELN (P, ' 

.). 

END; 



PROCEDURE COINNAME; 

PROCEDURE LISTDATA; 

BEGIN 

WITH COIN [Kl DO 
BEGIN 

WRITE (P,S) ; 

WRITE (P, DATE: 17-LENGTH (S) ) ; 

IF SILVERWEIGHT=0 THEN 
WRITE (P, 'MINIMUM' :10) 

ELSE WRITE (P , SILVERWEIGHT : 9:3) 

IF MELTVALUE=0 THEN 
WRITELN (P , ' NONE ' : 11 ) 

ELSE WRITELN (P, MELTVALUE: 12:2) 
END 
END; 



BEGIN 
K:=l ; 

REPEAT 

WITH COIN (K] DO 

CASE DENOMINATION OF 
100 : BEGIN S:='DOLLAR'; 
LISTDATA END; 

50 : BEGIN S : = ' HALFDOLLAR ' ; 

LISTDATA END; 

2 5 : BEGIN S : = ' QUARTER ' ; 

LISTDATA END; 

10 : BEGIN S:='DIME' ; 
LISTDATA END; 

5: BEGIN S := 'NICKEL'; 
LISTDATA END 

END; 

K:=K+1 

UNTIL ( K >TOTALCO INS) OR (K>100) 
END; 



BEGIN 

INITIALIZE; 

REPEAT 

WRITE ( ' — > ' ) ; 

WITH COIN [K J DO 
BEGIN 

READLN( DENOMINATION, DATE) ; 
ADDFACEVALUE (DENOMINATION) ; 

CASE DENOMINATION OF 
5: BEGIN 

IF ( DATE>= 1942) AND ( DATE<= 1 945 

) THEN 

SILVERWEIGHT : =5 . 5 3 8E-2 
ELSE SILVERWEIGHT :=0 
END; 

10 : SILVERWEIGHT : =7 . 154E-2 ; 

25 : SILVERWEIGHT :=1.907E-1; 

50: IF DATE<=1935 THEN 

SILVERWEIGHT : =7 . 623E-1 
ELSE IF ( DATE>1 935) AND ( DATE< 

1965) THEN 

SILVERWEIGHT : =3. 5615E-1 
ELSE IF ( DATE>1 964) AND ( DAT 

E<1971) THEN 

SILVERWEIGHT : =1 . 492E-1 ; 
100 : SILVERWEIGHT: =3 . 08E-1 
END; (*CASE*) 

MELTVALUE : =SILVERWEIGHT*SILVERPRIC 
E; 

ACCUMULATE ( SILVERWE IGHT , MELTVALUE ) 
END; (*WITH* ) 

K:=K+1 

UNTIL (K>TOTALCOINS) OR (K>100 ) ; 

HEADING; 

COINNAME; 

SUMMARIZE 

END. 
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A COMPUTER 
SPELLING EXERG 




S timulate interest in spelling by 
putting the spelling practice into 
the form of a word recognition game. 
While this program is designed primar- 
ily for children learning to spell, it can 
be easily modified to be more chal- 
lenging with harder words and more 
missing letters. 

Designed to run on standard Basic as 
much as possible, the program has been 
running on both Ohio Scientific ROM 
and disk-based computer systems. 

The exercise starts by selecting a 
word from a word list. This word is 
then displayed with a randomly chosen 



Sample Run 

COMPUTER 

WHAT'S THE MISSING LETTER ?P 
YOU'RE RIGHT; 

P7RSON 

WHAT'S THE MISSING LETTER ?A 
LET'S TRY IT AGAIN 
WHAT'S THE MISSING LETTER ?E 
YOU'RE RIGHT! 

OW? 

WHAT'S THE MISSING LETTER ?E 
LET'S TRY IT AGAIN 
WHAT'S THE MISSING LETTER ?N 
LET'S TRY IT AGAIN 
WHAT'S THE MISSING LETTER ?S 
THIS ONE IS PRETTY HARD 
LET'S TRY ANOTHER ONE. OK? 
ARITH7ETIC 

WHAT'S THE MISSING LETTER ?M 
YOU'RE RIGHT: 



BY JEREMY C. JONES 

letter missing. The computer asks you 
for the missing letter. After three tries, 
the system advances to the next ran- 
domly chosen word. 

Scoring is very easy to add by putting 
counters in the right answer section and 
in the new word generation section. 
Scores may be used to add difficulty 
feedback for the student. This may be 
done by ( 1 ) selecting shorter or longer 
words depending on the person's score, 
(2) having the DATA file of words 
consist of increasingly difficult words 
from the beginning to the end of the 
file. In either case, the purpose is 



motivation. It's clear that too easy a 
spelling quiz is boring, and that too 
hard a quiz is frustrating. By adjusting 
the difficulty, you can stay between too 
hard and too easy and avoid a boring 
and frustrating exercise . □ 



Jeremy Jones is Program Advisor to the 
Computer Science Program at Cham- 
inade University of Honolulu, and also 
owns and manages an Ohio Scientific 
computer store. He is a flight instruc- 
tor , retired professional trombonist 
and has graduate degrees in mathe- 
matics and physics. 



Program Listing 

10 REM— SPELLING QUIZ 

20 REM JEREMY JONES 11-28-79 

30 REM 808-732-5246 

40 REM COMPUTER SCIENCE PROGRAM 

50 REM CHAMINADE UNIVERSITY 

60 REM HONOLULU , HAWAII 96816 

70 MG = 2 : REM SET MAXIMUM NUMBER OF TRIES PERMITTED 
80 DEF FNR(X) = INT ( 1+RND (1) *X) 

90 REM GENERATES RANDOM INTEGERS 

100 REM FROM 1 THROUGH X TO BE USED FOR 

110 REM SELECTING WORDS AND LETTERS 

120 REM RANDOMLY. NOTE: SOME BASICS REPLACE 

130 REM RND(l) WITH RND(0) AND BEGIN WITH 

140 REM THE KEYWORD RANDOMIZE 

150 REM— COUNT WORDS IN LIST 

160 N = 0 : REM CLEAR COUNTER FOR COUNTING 

170 READ D$ t REM GET NEXT SPELLING WORD 

180 : IF D$="EOF" THEN 210 s REM EXIT WITH COUNT WHEN DONE 
Continued 
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Illustrated by Donni Richman 







Program Listing (continued) 

190 : N « N + 1 : REM COUNT EACH WORD IN THE DATA FILE 
200 GOTO 170 : REM GO COUNT THE NEXT SPELLING WORD 
210 RESTORE : REM REQUIRED FOR REREADING THE WORD FILE 
220 FOR I = 1 TO FNR(N) : REM GET RANDOM WORD 
230 : READ W$ : REM READ DOWN THROUGH FILE TO GET WORD 
240 NEXT I 

250 LW = LEN (W$) s REM FIND LENGTH OF SPELLING WORD 

260 RL = FNR(LW) : REM PICK RANDOM LETTER FROM WORD 

270 L$ = MID$ (W$,RL,1) : REM PICK OUT MISSING LETTER FROM WORD 

280 REM— DISPLAY WORD WITH MISSING LETTER 

290 NG = 0 : REM PREPARE TO COUNT NUMBER OF GUESSES 

300 FOR I = 1 TO LW : REM SCAN THROUGH THE WORD 
310 s C$ = MID$(W$,I,1) s REM PICK OUT EACH LETTER FROM WORD 
320 : IF I = RL THEN C$ = "?" : REM REPLACE ONE LETTER WITH ? 
330 : PRINT C$ ; 

340 NEXT I 

350 PRINT: PRINT: PRINT : REM THREE LINE FEEDS 
360 PRINT " WHAT’S THE MISSING LETTER " ? 

370 INPUT G$ s REM GET THE PERSON’S GUESS 
380 NG = NG + 1 s REM COUNT NUMBER OF GUESSES 

390 REM SCORE KEEPING COUNTERS COULD BE INSERTED IN THIS SECTION 
400 IF G$ = L$ THEN PRINT jPRINT " YOU'RE RIGHTS " s GOTO 480 
410 IF NG > MG THEN 440 s REM TOO MANY TRIES = TOO HARD 
420 PRINTS PRINT" LET ' S TRY IT AGAIN PRINT 
430 GOTO 360 : REM LET THE PERSON TRY AGAIN 

i 

440 REM OUT OF TRIES SECTION 

450 PRINT: PRINT 

460 PRINT M THIS ONE IS PRETTY HARD." 

470 PRINT" LET’S TRY ANOTHER ONE. OK?" s PRINT: PRINT 

480 REM GO TRY ANOTHER SPELLING WORD SECTION 

490 GOTO 210 

500 REM INSERT YOUR OWN WORD LIST HERE 

510 DATA APE, ELEPHANT, COMPUTER, SCHOOL, OWL 

520 DATA THINK, HOME, RAIN, WRITE, TELEPHONE 

530 DATA ONLY, MATHEMATICS, ARITHMETIC, CLASS 

540 DATA CLOWN, MACDONALDS, HAMBURGER, SHAKE 

550 DATA FOOD, ANIMAL, PERSON, SPAGHETTI, NOODLE 

600 DATA EOF : REM EOF MARKS THE END OF OUR SPELLING FILE 




Share Your 
Home 
Programs 

How do you use your computer at 
home? Family finances? Bud- 
gets? Meal planning? Entertain- 
ment? Teaching the kids? Word 
processing? Home security? In- 
vestment planning? Helping with 
your other hobby? 

Our readers are as software- 
hungry as you. So why not share 
the home applications programs 
you've developed? Send us an ar- 
ticle describing your application 
and the program you wrote to im- 
plement it. Be sure to include a 
program listing and sample run. 

Remember, readers aren’t 
familiar with your program. So 
explain in detail what the pro- 
gram does and how it does it. 
Include here the overall structure 
of your program as well as any 
special algorithms or routines 
you’ve used. Give suggestions 
for modifying or expanding the 
program for other applications or 
other situations. 

All submissions should be ori- 
ginal, typed (not all CAPS), dou- 
ble-spaced and neat. Include 
your name and address on the 
first page of the article and en- 
close a self-addressed, stamped 
envelope for return of material. 
Also, please use a fresh ribbon on 
your printer for program listings 
and sample runs. 

Feel free to call us at (617) 
232-5470 if you have any ques- 
tions or want to discuss specific 
article ideas. 

Mail your manuscript to: 

Don Wood, Managing Editor 
Personal Computing 
1050 Commonwealth Ave. 

Boston, MA 02215 
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H aving worked on large mainframe 
machines for many years, I admit I 
was quite smug in my condemnation of 
computer games, which I thought were 
a rather sad application of human in- 
tellect. But give purists their own 
computers to play with and I’ll guaran- 
tee one of the first ten programs they’ll 
write will be a game. At least that’s the 
way it was with me, except that this 
game was the second program I wrote. 
So much for strength of character! 

“Alice in Wonderland’’ was inspired 
by the February 1978 cover of Personal 
Computing , which called to mind the 
trials and tribulations Alice experi- 
enced in her quest to find home after 
falling down the rabbit hole. On reflec- 
tion, I realized the scenario was aptly 
suited to computer adaptation. 

Though I was very anxious to remain 
faithful to the book, I had at the time 
only 4K of memory to work with so it 
became necessary to limit the game’s 
complexity. If you have more memory 
at your disposal, I urge you to develop 
and implement the suggestions at the 
end of this article for expansion of the 
basic game. 

The object of the game is for you (in 
the role of Alice) to find the Rabbit 
before finding the Queen. Four addi- 
tional factors will hinder your finding 
the Rabbit, but I’ll tell you about them 
later. 

The “playing board’’ (see Figure 1) 
can best be described as a large, six- 
sided polygon which is subdivided into 
a number of equilateral triangles. At 
each angle and at each intersection is a 
room. The rooms are numbered from 
one to nineteen, and each room is 
connected by tunnels to the other 
rooms. Alice moves from room to 
room, finding out as she goes whether 
any of the other game characters are 
behind one of the doors available. By 
logic or by chance, Alice must choose 
the path which will lead her to the 
Rabbit. 

The four characters in “Alice in 
Wonderland’’ are the Rabbit, the 
Queen, the Mad Hatter and, of course, 
Alice. The placement and subsequent 
movement of the individual pieces are 
as follows. 

The Mad Hatter is one of the compli- 
cations I spoke of earlier. He is ran- 
domly in one of the nineteen rooms at 
the beginning of the game. Upon com- 



Hugo Jackson is a freelance writer and 
forms analyst with the Canadian fed- 
eral government. He is currently work- 
ing on an instruction manual that will 
serve as a basic introduction to Z-80 
Assembler language. 



pletion of every turn, he is randomly 
relocated but will never be placed in the 
same room with Alice or the Queen. If 
Alice enters the room the Mad Hatter 
presently occupies every piece will be 
randomly repositioned on the board 
(including Alice). The purpose of the 
Mad Hatter is to destroy any logical 
constructions you may have made with 
respect to the location of the Queen or 
the Rabbit. Warning : The Mad Hatter 
could well be sharing a square with the 



‘ 7 ’ ve often seen 
a cat without a 
grin . . .but a 
grin without a 
cat?” — Alice 



Rabbit. You do not win the game if you 
enter the Rabbit’s room when the Mad 
Hatter is there as well. While the 
computer will tell you that the rabbit 
was there, all the pieces will be relo- 
cated. Should you ever encounter this 
situation, try to control the urge to put 
your fist through the video monitor. 

The Queen is placed in one of the 
nineteen rooms at the beginning of the 
game. She will remain there unless 
Alice meets with the Mad Hatter, in 
which case she will be relocated. 
Should Alice meet with the Queen, you 
lose the game. 

The Rabbit is placed and relocated 
according to the same criteria as the 
Queen. If Alice finds the Rabbit, 
you’ve demonstrated your superior 
capacity for higher level logic by 
having won the game. 

Alice is placed in one of the nineteen 
rooms at the beginning of the game. 
From that point, however, you choose 
the path Alice will take. From the doors 
displayed, the computer will ask you to 
choose one. This procedure will con- 
tinue, with Alice going from room to 
room until you encounter one of the 
other characters. 

At this point, you may wonder how 
much skill is required for winning the 
game. Rest assured that it’s not as easy 
as it appears — for in addition to the 
Mad Hatter there’s another complica- 
tion to diminish your chances of 
success. 



If you’ve read Alice in Wonderland , 
you may recall that the doors through 
which she travelled were of different 
sizes. As it was in the book so it is in 
this game. At the beginning of each 
game the computer determines whether 
Alice is to be large or small. If she is 
small, she cannot pass through a large 
door and similarly if she is large she is 
unable to pass through a small door. 

Lest you feel that the introduction of 
this underhanded aspect of the game 
now makes it too difficult, you are 
provided with three “eat me’s’’ and 
three “drink me’s” at the beginning of 
the game. As in the book, a “drink me” 
will make Alice small if she is large, 
and an “eat me” will make her large if 
she is small. The computer will auto- 
matically decrement the correct counter 
when you pass through a door that is not 
compatible with her current physical 
size. 

Warning: Should you use up all your 
“eat me’s” or “drink me’s”, you can 
only pass through those doors which 
are the same size as Alice. As the door 
sizes are randomly determined before 
each turn, you could well be presented 
with doors which are all of the same 
size. If this happens after you have used 
up all your food and are unable to pass 
through any of the doors because of 
your present size, the game is stale- 
mated and ends. While this is not as bad 
as running into the Queen, it may indi- 
cate that a new strategy is required. 

This program was originally written 
on a TRS-80 with Level I Basic and 4K 
of RAM. Since that time, however, 
I’ve upgraded my machine to Level II. 
The Program Listing shows the Level II 
program. Level I owners will need to 
delete the DIMension statement and re- 
place the logical AND and OR opera- 
tors with Level I’s and “+”. If 
you have only 4K of RAM, you’ll need 
to use all the Level I command contrac- 
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Figure 1: The “playing board” showing all 
nineteen rooms and the connecting corridors. I 
have found the game to be a lot more interest- 
ing if it is played without the benefit of this 
“map.” 



Illustrated by Josh Randall 
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Figure 2: You’re down the rabbit hole and at 
the moment you have six doors from which to 
choose. As you are “small,” the decision to 
enter doors 4 or 5 will result in you having to 
take an “EAT ME” in order to pass through 
these large doors. 




Figure 3: Later in the game, you have 
already hit the Mad Hatter and barely escaped 
being caught by the Queen. You have used an 
“EAT ME” and a “DRINK ME” and you now 
have only two of each left. There are three 
doors and one leads to the Rabbit. 




Figure 4: Congratulations! You were right. 
The Rabbit was indeed hiding behind door 
number 1. You win the game . . .but was it skill 
or luck? How can you be sure? Perhaps you 
will think twice before you jump down the 
rabbit hole again! 



tions to get the whole program to fit in 
your machine. As the program is fairly 
straightforward, owners of other com- 
puters should experience little diffi- 
culty in adapting this game to their own 
machine. 

In developing this program, as with 
others I have tackled, I was faced with 
the choice of making the program either 
more intricate or more interactive. As I 
favor interaction, which is quite costly 
in terms of memory, I was unable to 
incorporate all the subtleties I would 
have liked. So I invite fellow pro- 
grammers with more memory at their 
disposal to implement the following 
additions to “Alice In Wonderland”: 

Cheshire Cat: I envision the Chesh- 
ire Cat’s role as one of a red herring: If 



Alice is in a room with a door that leads 
to the Cheshire Cat, you will be told 
that the Rabbit is near. How frustrating 
when, confident of success, you open 
the door only to find the Cheshire Cat. 
This might be a good place for rear- 
rangement of the pieces. 

Tweedledee and Tweedledum: They 
are placed together in the same room 
and upon meeting them Alice may ask 
either (but not both) one question: “Is 
the Rabbit in Room No. ??” The ques- 
tion will be answered by a “yes” or 
“no.” To make it more intriguing, try 
programming them so that one twin 
tells the truth and the other always lies. 
This would be randomly determined at 
the start of each game. After Alice has 
left the twins, they should be randomly 



relocated on the board. To complicate 
matters even more, Tweedledee and 
Tweedledum should be unable to dif- 
ferentiate between the Rabbit and the 
Cheshire Cat. Remember, even if Alice 
is able to determine the Rabbit’s posi- 
tion from Tweedledeee and Tweedle- 
dum, she still must reach the Rabbit and 
there’s still the Mad Hatter to contend 
with. 

Those are just two suggestions as to 
how you might improve or expand the 
game. If you have more memory than 
you know what to do with (unlikely), a 
quick review of Lewis Carroll’s book 
should provide you with a lot more 
ideas on how to make “Alice in 
Wonderland” even more interesting 
and challenging. □ 



Program Listing 



108 REM*************************************** 

110 REM 

120 REM RLICE IN WONDERLAND 

130 REM 

140 REM BV HUGO T. JACKSON 

150 REM 

168 REM*************************************** 

170 REM 

180 REM ASSIGNMENT OF VARIABLES: 

190 REM 

200 REM D = CURRENT POSITION OF RLICE 

21© REM L = INPUT UfiLUE FOR RL ICE'S MOUE 

220 REM R = RABBIT'S POSITION 

238 REM B = QUEEN'S POSITION 

240 REM C = MAD HATTER'S POSITION 

258 REM 

260 REM*************************************** 
278 ' 

28© ' 

1000 D I MA < 1 80 > 

1010 F0RX=1TQ192 

1820 PRINT” +RLICE IN WONDERLAND*"; 

1030 NEXTX 

1040 FORX= 1 TO 1 800 s NEXTX 
1050 F0RX=1 TO 16: PRINT: NEXTX 
I860 PRINT8463, "AND IT'S DOWN 
THE RABBIT HOLE WE GO" 

1 078 FORX= 1 TO2080 : NEXTX 



1 080 FORX* 1 TO 1 6 : PR I NT s NEXTX 

1890 CLS 

1108 E=3 

1118 F=3 

1128 P=0 

1138 K=RND < 2 > 

1140 I FK= 1 PR I NT® 469 , " RL I CE , WE ' RE SO SMALL ! " 

1 1 50 I FK=2PR I NT *8469 , " RL I CE , WE ' RE ENORMOUS ! " 

1 1 60 FORX= 1 TO 1 800 s NEXTX 
1170 REM*** PL AVER *** 

1188 D=RND<19> 

1190 L=D 

1200 REM*** RRBBIT *** 

1218 A=RND< 19> 

1220 I F A=DGOT 0 121 0 
1230 REM*** QUEEN *** 

1248 B=RND<19> 

1 250 I F < B=D > + < B=A GOTO 1 248 
1260 REM*** MRD HATTER *** 

1270 C=RND < 1 9 > 

1 280 I F < C=D > + < C=B > GOTO 1 270 
1290 CLS 

1300 PR I NT '8466 .■ “NOW WHERE DOES THIS LEAD TO?” 

1 3 1 0 FORG= 1 TO500 = NEXTG 
1 328 REM***CLEAR ARRFiV*** 

1338 F0RG=1TG19 
1340 R<G>=0 
1350 NEXTG 

1360 REM*** DOORS & SIZE +** 

1370 J=0 

1380 RESTORE continued 
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1390 F0RG=1TQ183 
1400 RERDH 

1410 I FH~ 1 00< >LNEXTG 
1420 RERDH 

1430 I FH > 1 00GOT 0 1470 

1440 ,T=J+1 

1450 fl<H)=RND<2> 

1460 GOTO 1420 

1470 REM+++RRINT THE DOORS*** 

1480 CLS 

1 490 Z= < 1 28- <21 *J > > ^2 
150© W=Z-'2+ 1 96 
1510 F0RG=1TQ19 
1520 I FA < G > =0GOT 0 1 790 
1530 IFR<G> =S 1 GOTO 1 66U 
1540 PRINT-8W,G; 

1550 F0RV=7T027 
1560 SET < 2+Z .. V > 

1570 SET <21 +2, V> 

1530 NEXTV 

1590 F0RX=2+ZTG21+Z 

1600 SET <X, 6> 

1610 SET <X, 17) 

1620 SET<X,27> 

1630 NEXTX 
1640 SET<Z+17, 20 > 

1658 GOTO 1770 
1 660 PR I NT-8W+ 1 92 , G ; 

1670 FORV= 1 7T027 
1680 SET<7+Z,V) 

1690 SET < 16+Z.. V) 

1700 NEXTV 

1710 FORX=S+ZT 0 16+Z 

1720 SET<X, 17) 

1730 SET <X, 21 > 

1740 SET < X , 27 > 

1750 NEXTX 
1760 SET < X-2 .. 23 > 

1770 Z=Z+2 1 
1780 UMi.N-10. 5 
1790 NEXTG 

1800 REM***WHG IS CLOSE*** 

1810 F0RG=1T019 
1820 IFR<G)=0GOTO1868 

1830 I FG-APR I NT <8662 .• " THE RRBBIT IS CLOSE " 

1840 IFG=BPRINT«8727, “THE QUEEN IS NEAR 11 
1850 I FG=CPR I NT-8788 .• " THE MfiD HATTER IS NERRBV" 
I860 NEXTG 

1870 REM****+SHOW THE COUNT****** 

1880 PRINT'S©, "EAT ME TO GROW: " 

1890 PR I NT'S 1 6, F 

1900 PR I NT'S 36, "DRINK ME TO SHRINK: " 

1910 PRINT-856, E 

1920 IF K= 1 PRINT'SSl, M ALICE, WE -RE SO SMALL"; 
1930 IF K=2 PRINT'SSl, "ALICE, WE ’RE ENORMOUS"; 
1940 REM*** INPUT THE TURN*** 

1950 PRINT *8832, " " 

I960 PRINT'S896," " 

1970 PR I NT-8960, " "; 

1980 PRINT-S831, " 

1990 INPUT "ALICE, WHICH DOOR SHOULD 
WE GO THROUGH" ;L 
2000 I F I NT < L ) =LGGT 02040 
2010 PR I NT *8832, "ALICE, THIS IS HARDLV 
THE TIME FOR JOKES" 

2020 FORG= 1 TO2800 : NEXTG 
2030 GOTO 1950 

2040 I F < L< 1 ) + < L > 1 9 > GOT 020 1 0 
2050 I FR< LX >0GOTO2 1 00 

2060 PRINT'8832, "BUT ALICE, THERE'S NO DOOR 
LEADING TO THERE!" 

2070 F ORG= 1 T 02000 

2080 NEXTG 

2090 GOTO 1950 

2180 I FA < L ) =KG0T02488 

2110 I FK=2G0T 02300 

2 1 20 I FF< >0GOT 02260 

2130 F0RG=1T019 

2140 I FA < G > = 1 GOTO2220 

2150 NEXTG 

2160 CLS 

2170 PR I NT *8340 , "I GUESS THAT'S IT FOR US!" 
218© PR I NT *8403, "ALL THE DOORS ARE ENORMOUS, " 
2190 PRINT-8473, "AND WE'RE TINV" 

2200 PRINT-8529, "AND WE'RE ALL OUT OF EAT ME'S" 



2210 GOTO2710 
2220 PRINT'8832, "WE 'RE OUT 
OF EAT ME-'S ALICE, 

WE CAN'T GO THERE" 

2230 F GRG= 1 TO 1 800 

2240 NEXTG 

2258 GOTO 1950 

2260 F=F-1 

2270 K=2 

2280 P=1 

2290 GOTO2480 

2308 IFEO0GOTO2440 

2318 FGRG=1TG19 

2328 I F A < G ) =2G0T 02 400 

2330 NEXTG 

2340 CLS 

2350 PRINT»S413, "THAT'S IT" 

2360 PRINT-8469, "ALL THE DOORS ARE TINV" 

2370 PRINT-8538," WE 'RE SO BIG" 

2380 PRINT-8591, "AND WE 'UE FINISHED OFF 
THE DRINK ME" 

2390 GOTO2710 

2408 PRINT-8832, "THERE'S NO DRINK ME LEFT, 

WE CAN'T GO THERE" 

241© F GRG= 1 TO 1 000 
2420 NEXTG 
2430 GOTO 1950 
2448 E=E— 1 
2450 K=1 
2460 P=1 
2478 G0T02488 
2480 IFLOBGOTO2530 
2490 CLS 

2588 PRINT-8405, "CURTAINS FOR US ALICE!" 

25 1 0 PR I NT-8473 , " I T ' S THE QUEEN ! " 

2520 GOTO2710 
2538 I FL< >CGOT 026 1 0 
2548 CLS 

2550 PRINT-8403, "OH NO, IT'S THE MAD HATTER!" 
256© IFLOAGOTG2580 

2578 PRINT-8463, "AND ALICE, THE RABBIT WAS 
THERE ! ! ! " 

2588 FGRG=1TO1000 
2590 NEXTG 
2688 GOTO 1178 
2618 I FL< > AGOT 02660 
2620 CLS 

2630 PRINT-8407, "WE'RE SAUED ALICE!" 

2648 PR I NT *8469, "VOU FOUND THE RABBIT! !" 

2650 GOTO2710 
2660 D=L 

2678 I FP< > 1 GOT 02700 
2680 P=0 
2690 GOTO 123© 

2708 GOTO 1260 

27 1 8 FORX” 1 T 04008 s NEXTX 

2728 CLS 

2730 PR I NT : PR I NT : PR I NT : PR I NT : PR I NT : PR I NT : PR I NT 
2748 INPUT" WOULD VOU LIKE TO PLAV 

AGAIN" J AT- 
2750 CLS 

2768 IF fl$="VES" OR AT="V" GOTO I860 
2770 CLS 

2780 PRINT-8473, "BE SEEING VOU!" 

2790 PR I NT : PR I NT : PR I NT : PR I NT : PR I NT 

2800 DATA181 , 2, 3, 5, 6 

2810 DATA182, 1,4,5 

2820 DATA 1 03 , 1 , 6 , 7 

2830 DATA 104,2 , 5 , 8 , 9 

2840 DATA 1 05 ,1,2,4 , 6 , 9 , 1 0 

2850 DATA 106, 1 , 3, 5, 7, 10, 1 1 

2868 DATA 107, 3, 6,11 , 12 

2870 DAT A 1 08 ,4,9, 1 3 

2880 DATA 109,4,5,8, 10, 13, 14 

2890 DRTA1 10, 5, 6,9, 11, 14, 15 

2900 DftTAl 1 1 , 6, 7, 10, 12, 15, 16 

2910 DflTAl 12, 7, 11, 16 

2920 DATA 113,8,9,14,17 

2930 DATfll 14, 9, 10, 13, 15, 17, 19 

2940 DRTA115, 10, 11, 14, 16, 18, 19 

2950 DfiTRl 16, 1 1 , 12, 15, 18 

2968 DflTAl 17, 13, 14, 19 

2978 DATfll 18, 15, 16, 19 

2980 DATAl 19, 14, 15, 17, 18 

2998 DATA208 continued 
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Modems 



Your Link to the World 



BY KEN MAZUR 
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Figure 1. Pulses/Square waves 






H ello? Hello? Mainframe, are you 
there? 

When you use your microcomputer 
system to “talk” to other micros or 
mainframe machines over standard 
telephone lines, you have to get in- 
volved with a piece of equipment 
known as a “modem. ” With a modem, 
you can change your micro from an 
isolated unit to one that can link its 
capabilities to other machines of a simi- 
lar nature or even tie into mainframe 
units located hundreds of miles away. 

To link into the two most prominent, 
consumer oriented microcomputer net- 
works (CompuServe Information Ser- 
vice and The Source; for a detailed ex- 
planation of networking see the Sep- 
tember issue of Personal Computing ), 
your modem must have the following 
characteristics: it must be capable of 
transmitting data at up to 300 bits per 
second (often referred to as 300 baud); 
it should be a full duplex model (CIS 
can handle a half duplex unit but full 
duplex is recommended by the firm); it 
must be able to operate in an originate 
mode; and it must be compatible with 
the Bell 103 modem. You also need a 
serial interface. 

For a person shopping for a modem, 
modem terminology might be confus- 
ing. To resolve some of the confusion, 
let’s cover the basic principles of 
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modems first and then discuss charac- 
teristics that may vary from unit to unit. 

A modem serves two basic func- 
tions: it converts the digital signals used 
by your microcomputer (or terminal) 
into a form that can be transmitted over 
standard telephone lines; and it takes 
signals coming over a phone line and 
converts the signals into a form that 
your computer will recognize. The 
process of conversion is called modu- 
lation while the decoding process is 
known as demodulation — hence 
modulator/demodulator or modem. 

The need for a device to translate 
signals arises from the differences be- 
tween the signals a microcomputer uses 
and the signals of a standard, voice- 
grade telephone line. Your computer 
recognizes signals called pulses or 
square waves (see Figure 1). A pulse is 
there or it isn’t; there’s no in between. 
Your telephone line, on the other hand, 
is designed to carry analog signals 
which are represented by means of con- 
tinuously variable physical quantities. 
To illustrate, a digital signal may have a 
“high” represent a 1 (or a “yes” or an 
“on”) and a “low” represent a 0 (or a 
“no” or an “off’). Those are the only 
two distinctions a digital signal can 
make. An analog signal not only has 
highs and lows, but can take on values 
in between as well. 

The basis of an analog signal is a 
continuously cycling voltage known as 
a carrier signal. For any given com- 
munications line, the volume (ampli- 
tude) and tone or pitch (frequency) of 
the carrier signal is constant. A carrier 
signal conveys no information by itself, 
but by altering one of the characteristics 
(amplitude or frequency) of the signal, 
information can be transmitted over the 
lines. Altering these characteristics to 
convey information is known as modu- 
lation. In short, you’re modifying the 
signal. 

There are three commonly used tech- 
niques of modulation (see Figure 2): 
amplitude modulation (you vary the 
“volume” of the carrier signal so that 
one volume represents a digital 1 and 
another indicates a 0); frequency modu- 
lation (you have the frequency of the 
carrier signal represent a digital 1 while 
an increased frequency denotes a 0); 
and phase modulation (you alter the 
rhythm of the carrier signal). Of the 
three techniques, frequency modula- 
tion is most commonly used for 
modems that transmit at 300 bits per 
second (bps) or less. In the frequency 
modulation technique called frequency 
shift keying, you can increase the fre- 
quency of the carrier signal to represent 
a digital 0 and let the original frequency 



Modem Glossary 



Acoustic coupler — A variety of 
modem that uses a conventional 
telephone handset. The handset is 
usually placed in rubber cups pro- 
truding from the modem. 

Amplitude modulation — A method 
of transferring data via modem in 
which the amplitude (loudness or 
volume) of a carrier signal is altered 
to represent digital Os and Is. Abbre- 
viated AM. 

Analog signal — A signal that can take 
on any value within a given range. 
(Compare with Digital signal.) 
Asynchronous transmission — Data 
transmission in which each char- 
acter has its own start and stop bits 
and there is no control over the time 
between characters. 

Baud — A unit for measuring data 
transmission speed. Baud and bits 
per second (bps) are often used in- 
terchangeably. 

Bell-compatible modem — A modem 
whose phone line audio signals meet 
Bell Telephone standards. 

Carrier signal — A signal that con- 
tains no information by itself but 
whose characteristics can be altered 
to cany data. 

Digital signal — A signal that takes on 
two distinct values representing bi- 
nary Os and Is. (Compare with Ana- 
log signal.) 

Frequency modulation — The most 
common method of transferring data 
via modem, in which the frequency 
(pitch or tone) of a carrier signal is 
altered to represent digital data’s Os 
and Is. Abbreviated FM. 

Frequency Shift Keying — A method 
of data transmission in which a 
carrier signal’s frequency shifts 
back and forth between two distinct 
frequencies to designate Os and la. 
Abbreviated FSK. 

Full duplex — Pertains to the simulta- 
neous, independent transmisssion of 
data in both directions over a com- 
munications line. 

Half-duplex — Pertains to the opera- 
tion of a communications link in 
either direction over a single channel 
but not in both directions 
simultaneously. 

Hard-wired modem — A variety of 
modem that connects directly to a 
phone line, usually by plugging into 
the telephone’s wall receptacle. 

Mainframe — Synonymous with 
Central Processing Unit (CPU); 
however, with the proliferation of 



microcomputers, “mainframe” is 
often used to refer to large computer 
systems. 

Modem — An acronymn for /nodulator- 
rfemodulator; a device used at each 
end of a telephone line to convert 
binary digital data to audio tones suit- 
able for transmission over the line 
and vice versa. 

Modulation — The process of altering 
the tone, volume or rhythm of a 
carrier signal to convey information. 

Network — A system of intercon- 
nected computers and/or terminals. 
The two largest microcomputer con- 
sumer networks are CompuServe 
Information Service and The Source. 

Originate/ Answer — Two modes of 
operation for a modem. In the “orig- 
inate” mode, the modem will utilize 
one set of frequencies to transmit 
data and another set of frequencies 
to receive data. In the “answer” 
mode, these frequency sets are re- 
versed. For two modems to commu- 
nicate, one modem must be in the 
“originate” mode while the other is 
in the “answer” mode. 

Phase modulation — A method of 
transferring data via modem in 
which the rhythm of a carrier signal 
is altered to represent digital Os and 
Is. Abbreviated PM. 

Pulse — An abrupt change in voltage 
(either positive or negative) that 
conveys digital information over a 
circuit. 

Serial interface — Circuitry that trans- 
forms digital data from a parallel 
mode to a sequential mode. The 
most common serial interface is the 
RS-232. 

Signal wave — An intentional disturb- 
ance in a communications line, as 
opposed to noise, which is an un- 
wanted disturbance that may be 
caused by a number of factors. 

Simplex — Pertains to a communica- 
tions link that is capable of transmit- 
ting data in only one direction. 

Start/stop bits — Bits transmitted 
immediately before and after a block 
(or character, in the case of asyn- 
chronous transmission) of data. The 
start bits alert the receiving system 
to expect incoming data while the 
stop bits signal the end of the trans- 
mission for that block. 

Synchronous transmission - Data 
transmission in which the bits are 
transmitted at a fixed rate. 

— By Ken Mazur 
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machine recognizes 
the character “A” (dec- 
imal 65 using the ASCII code) as 
an eight-bit configuration of 0 1 0 0 0 0 
0 1 (step 1 of Figure 3). The byte “A” 
goes into the RS-232, which releases 
the bits in a serial fashion (step 2). The 
“pulses” of the RS-232 are received by 
the modem (step 3) and changed to 
acoustic tones for transmission over the 
telephone lines (step 4). When the 
tones reach the modem at the other end 
of your communications link, the 
reverse process occurs and an “A” is 
received. 

While the above generally outlines 
the function all modems perform, there 
are characteristics of individual 
modems that vary from model to 
model. Some of the terms likely to be 
used when you are discussing the pur- 
chase of a modem will be: synchro- 
nous, asynchronous; simplex, half- 
duplex and full duplex; low speed, high 
speed; short-haul, long-haul; originate, 
answer; acoustic coupler and hard- 
wired modem. These terms may seem 
formidably electronic but essentially 
they are labels for easy-to-understand 
concepts. 

There are basically two ways for a 
modem to handle the transmission of 
data: in uneven bursts or as a con- 
tinuous stream. Data entered from a 
keyboard is of the burst nature because 



Lexicon 

acoustic coupler 



of the signal convey a 1 . 

While all of this sounds pretty tech- 
nical, a modem handles the process of 
coding and decoding the various sig- 
nals so that you don’t have to worry 
about how the process takes place. 

Before we trace a typical trans- 
mission of a byte of data, there is one 
other alteration that has to take place 
before your computer can utilize the 
functions of a modem. 

Most processes taking place in your 
microcomputer deal with bytes of in- 
formation (normally eight bits although 
some CPU registers may be dealing 
with 16 bits). Because a phone line 
doesn’t have at least eight parallel wires 
per cable to transmit eight bits at a time, 
the eight bits have to be transformed 
from a parallel configuration to a serial 
mode where each of the bits is trans- 
mitted one after the other instead of the 
eight going out simultaneously. The 
transformation from parallel to serial is 
most often handled by an RS-232 serial 
interface. 

In very simplified terms, the follow- 
ing process takes place for the trans- 
mission of the letter “A”. Your 



a human doesn’t type in a mechanically- 
timed way. Data transmitted in a start- 
stop, start-stop fashion is called asyn- 
chronous. Data transmitted in a con- 
tinuous stream (such as that from tape 
or disks) is referred to as synchronous. 

Asynchronous transmission, in 
which the time interval between char- 
acters varies, is usually used for low 
speed transfer. Synchronization of the 
sending unit and the receiver is achieved 
by adding a bit pattern before each 
character transmitted. These bits, often 
called start-stop bits, alert the receiving 
unit that data will be transferred and 
thus establish the synchronization 
needed for the answering unit to inter- 
pret the data correctly. This type of 
transmission is ideal for data sent from 
a keyboard but doesn’t utilize line 
capability very well because of the 
large overhead of start-stop bits that 
don’t really have much to do with the 
actual data being sent. 

Synchronous transmission uses line 
capabilities more efficiently but re- 
quires more complex circuitry and as a 
result the equipment generally costs 
more. Synchronization is achieved by 
using special bits at the beginning of 
each message, as opposed to each char- 
acter. The data are sent at periodic 
intervals (as determined by some clock- 
ing source) in blocks such as the con- 
tents of a terminal buffer. 

If you own a microcomputer or ter- 
minal that you’ve tied into a network 
like The Source or CIS, an asynchro- 
nous modem is the kind you’ll want. If 
you own a larger business system 
which is used to transmit records from 
individual offices to a mainframe 
located in some other city, you should 
look into a synchronous modem. 

Modems are also classified accord- 
ing to the direction of data travel. 
Simplex refers to modems that allow 
transmission in one direction or the 




Figure 3. Signal conversion by modem: Step 1, bit configuration for the 
letter “A” as recognized internally by computer. Step 2, serial interface 
alters byte into serial configuration; Step 3, pulses from serial interface 



received by modem; Step 4, pulses changed to acoustic tones suitable for 
transmission over phone lines; Step 5, when tones are received by 
answering modem, the reverse process takes place. 
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other but not both. As a result, simplex 
modems aren’t really used much any- 
more. A half-duplex system is one in 
which information may flow in either 
direction on the communication link 
but not simultaneously. A full duplex 
unit allows simultaneous transmission 
in both directions. Many modems can 
operate in more than one mode (usually 
half and full duplex). 

Speed of transmission is one of the 
more important factors to consider 
when purchasing a modem for your 
computer. If you plan to use the modem 
for linking into The Source or the Com- 
puServe Information Service, the unit 
should transmit at up to 300 bps. This 
relatively slow speed is dictated by the 
quality of most dial-up phone lines. For 
business use (and a financial outlay of 
over $6000) you can pick up a synchro- 
nous modem that will send data at 
64,000 bps over high quality leased 
lines. Luckily, individuals who wish 
only to tie into a network for their own 
private use can get a good machine in 
the $200 to $300 range. 

Most modems on the market today 
are considered long-haul units; that is, 
they are capable of functioning satis- 
factorily over almost unlimited dis- 
tances using regular dial-up telephone 
lines or leased lines. You can, how- 
ever, obtain short-haul (or limited dis- 
tance) models designed to function 
with short, point-to-point leased lines. 
The short-haul units generally cost less 
than long-haul versions with similar 
capabilities. As an end user, you’ll 
probably want a long-haul model, 
though the short-haul units will be of 
interest to businesspersons whose firms 
have their own mini-networks for data 
processing. Definitions of what consti- 
tutes the “short” in short-haul vary so 
ask what the range of any particular 
short-haul unit is. 

Originate/answer is another char- 
acteristic that the prospective modem 
buyer has to consider. While some 
modems feature only originate or only 
answer, the most flexible unit is one 
that has both capabilities. In most in- 
stances, at least when communicating 
with a time-sharing data' base main- 
frame like The Source or CIS, you will 
be in the originate mode and the main- 
frame at the other end of the line will be 
in the answer mode. If you are going to 
buy a unit that has both originate and 
answer functions, be sure the mode can 
be changed with a switch setting rather 
than having to play around with the 
wires to go from one mode to the other. 

Without going into a lot of detail, 
putting your modem into one of the two 




models and may be subject to phone 
company regulations. But, they don’t 
suffer from the extraneous noise prob- 
lem. Hardwired modems are constantly 
being redesigned and the newer models 
get smaller and more portable every 
day. Cost may be the major factor in 
deciding which type to purchase. 

In addition to all the characteristics 
discussed, modems are being marketed 
with increasing capabilities and 
options. Some of the “extras” include 
automatic answering, automatic dial- 
ing, alternate voice/data transmission 
ability, equalization (a technique that 
compensates for transmission line in- 
consistencies), and diagnostic facilities 
(capabilities which allow the modem to 
test for transmit/receive problems be- 
fore time is spent sending data over the 
lines). Remember, “extras” can raise 
the price of a unit considerably so be 
sure you’re going to get full use of the 
“extra” before you spend a lot of 
money buying a unit . 

A couple of final points to remember 
are to check on whether the modem you 
are interested in is compatible with the 
Bell modems; and, if it’s a hard-wired 
model, whether the unit is FCC 
approved for direct connection to tele- 
phone lines. 

Modems are an essential piece of 
equipment if you plan to use your 
microcomputer to communicate with 
other machines, whether micros or 
mainframes. They are surrounded with 
technical jargon but a person who 
knows what the terms mean and who 
has determined exactly what the unit 
will be used for will find the selection 
process easier to deal with. (Modem 
vendor guide on page 64. ) □ 



modes enables it to utilize certain fre- 
quencies to communicate with the 
modem down the line. For example: If 
you are in originate mode when you call 
the network mainframe, your modem 
will use a certain range of frequencies — 
call it “F” — to transmit. The range is 
due to needing one frequency of “F” to 
indicate a “1” and another frequency 
of “F” to denote a “0”. In the originate 
mode, your modem will also use a 
range of frequencies “G” to receive 
data from the mainframe. The main- 
frame modem, which is set for answer, 
uses the “F” frequencies to receive 
your data while it sends data to you in 
the “G” range. If both modems were 
set to originate, they would both be 
transmitting in the “F” frequency 
range and receiving in the “G” range, 
which means no communication would 
take place at all. 

The final distinction among modems 
will be acoustic couplers versus hard- 
wired modems. In an acoustic coupler, 
a standard telephone receiver is placed 
in two rubber cups on the coupler. The 
coupler changes digital signals from the 
microcomputer into acoustical tones 
that are transmitted through the mouth- 
piece of the receiver. For reception, the 
coupler takes the tones emitted from the 
earpiece and changes them into digital 
signals. Hard- wired modems connect 
directly to your phone line by plugging 
into the phone’s wall receptacle. 

Each type of modem has advantages 
and disadvantages. An acoustic coupler 
is usually less expensive than a hard- 
wired unit and up to a short while ago 
was more portable as well. The major 
disadvantage of an acoustic unit is that 
background noise in the room can often 
mess up transmission of data. Hard- 
wired modems have a tendency to be 
more expensive than acoustic 



Emtrol hard- wired modem 
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Modem Vendor Guide 


Company 


Model name 


Price 


Type 


Trans- 


Modulation 


Speed 


Duplex 


Operating Distance 


BeU 


FCC 


Name 


or number 


$ 




mission 


technique 






mode 




compatible 


certified 


Anderson Jacobson Inc. 


A242A 


295 


A 


A 


F 


0-450 


H,F 


O 


L 


Y 


NA 


521 Charcot Ave. 












baud 












San Jose, CA 95131 


AJ 245 


245 


H 


A 


F 


0-450 


F 


O 


L 


Y 


Y 


(408) 263-8520 
Circle 201 












baud 












Apple Computer Inc. 
10260 Bandley Dr. 


Micromodem 


379 


H 


A 


F 


110 or 300 


S,H,F 


O.A 


L 


Y 


Y 


Cupertino, CA 95 104 


II 










baud 












(408)996-1010 
Circle 202 


(for Apple II) 






















Data Access Systems, Inc. 
100 Route 46 


DASI 68-01 


295 


H 


A 


F 


300 


H,F 


O.A 


L 


Y 


Y 


Mountain Lakes, NJ 07046 

(201)227-8880 

Circle 204 












baud 












Emtrol Systems Inc. 
1262 Loop Rd. 


Lynx 


239.95 


H 


A 


F 


300 


H,F 


O.A 


L 


Y 


Y 


Lancaster, PA 17601 
(717) 291-1116 
Circle 205 


(for TRS-80) 










baud 












Lexicon Corp. of Miami 
8355 Executive Center Dr. 


LEX- 11 


175 


A 


A 


F 


300 


H,F 


O.A 


L 


Y 


NA 


Miami, FL 33166 
(305) 592-4404 
Circle 206 












bps 












Madzar Corp. 

37490 Glenmoor Dr. 


Z9600 


167 


H 


A 




0-9600 


S,H,F 


0,A 


S 


NA 


NA 


Fremont, CA 94536 
(415) 794-7400 
Circle 207 












bps 






(10 miles) 






Micromint Inc. 
917 Midway 


Chatterbox 


259.95 


A 


A 


F 


300 


F 


O 


L 


Y 


NA 


Woodmere, NY 11598 
(516) 374-6793 
Circle 208 












baud 












MicroPeripheral Corp. 
PO Box 529 


The Micro 


249 


H 


A 


F 


300 


H,F,S 


O 


L 


Y 


Y 


Mercer Is., WA 98040 


Connection 










baud 












(206) 454-3303 
Circle 209 


(for TRS-80) 






















Novation 


D-Cat 


199 


H 


A 


F 


0-300 


H,F 


O.A 


L 


Y 


Y 


18664 Oxnard St. 












baud 












Tarzana, CA 91356 


CAT 


189 


A 


A 


F 


0-300 


H,F 


O.A 


L 


Y 


NA 


(213)996-5060 
Circle 2 10 












baud 












Potomac Micro-Magic Inc. 
3 Skyline Place, Suite 604 


MM- 103 


359.95 


H 


A 


F 


61-600 


H,F 


O.A 


L 


Y 


Y 


5201 Leesburg, VA 22041 






(S-100 






baud 












(703) 379-9660 






direct 

plug-in) 


















Circle 211 
























Radio Shack 

1300 One Tandy Center 


Telephone 


199 


A 


A 


F 


0-300 


H,F 


O.A 


L 


Y 


NA 


Fort Worth, TX 76102 


Interface 11 










baud 












(817) 390-3011 
Circle212 


(for TRS-80) 






















Universal Data Systems 
5000 Bradford Dr. 


UDS 103LP 


195 


H 


A 


F 


0-300 


F 


O 


L 


Y 


Y 


Huntsville, AL 35805 
(205) 837-8100 
Circle 213 












bps 













Type: Transmission: 

A = Acoustic coupler A = Asynchronous 

H = Hard-wired S = Synchronous 



Modulation technique: 

A = Amplitude Modulation 
F = Frequency Modulation 
P = Phase Modulation 



Duplex: 

H = Half duplex 
F = Full duplex 
S = Simplex 



Operating mode: 

O = Originate 
A = Answer 



Distance: 

L = Long haul 
S = Short haul 



Bell Compatible: 

FCC Registered: 

Y = Yes 

NA = Not applicable 
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NEW YORK COLISEUM, 



4th 




OCTOBER 30 TO NOVEMBER 1, 1980 



ANNUAL 






NATIONAL SMALL COMPUTER SHOW 



?A NEW WORLD OF SMALL 
COMPUTERS IS AT YOUR 
FINGERTIPS THIS FAIL 

When we say “fingertips" we meat) just that: a 
hands-on-inspection opportunity for you to try 
the small computers and systems that will write 
the history of microprocessing in the 1980's. 

Manufacturers will fill over 30,000 square feet 
with computers, software and peripherals. 
Amazing strides in technology are reflected in 
exhibits and lecture series. 

New hardware and software for business, 
education, the sciences and professions, 
graphics and personal use are being gathered 
for the largest and most beautifully presented 
National Small Computer Show ever produced. 

As always, the show contains attractions for 
the seasoned computer professional, as well as 
those who wish an introduction to the exciting 
world of small computers for business, 
professional or personal use. In just a short 
time, you can discuss your interest with many 
industry leaders, vendors, technologists, and 
our expert lecturers. 

Registration fee is only $10 per day, and all 
registrants have free access to the hourly 
lectures. 

LECTURE PROGRAM 

A schedule of free lectures is available to all 
visitors. Lectures run about 50 minutes each, 
including, in most cases, some time for 
questions from the floor. Some topics are given 
twice, and, in some cases, topics of related 
interest are given on the same day for the 
visitor's convenience. (Program is subject to 
change without notice, but lectures will be 
posted daily in the show lobby.) 

THURSDAY, OCTOBER 30 

Noon Introduction to Small Systems for 

Business, Stan Veit, Associated Computer 
Industries 

Noon Mailing Lists: Several Directions, 

Dr. Norman I. Agin, Mathtech, Inc. 

1 p.m. Selecting a Small Computer for Business, 
David Benevy, Computer Mart of New 
Jersey 



1 p.m. Evaluating and Improving Your Computer’s 

Performance, Philip Grossman, Raytheon 
Co. 

2 p.m. Law Office Systems Aspects of Word 

Processing, Bernard Sternin 

2 p.m. Future Smart Machines: 2000 A.D. and 

Beyond, Dr. Earl Joseph, Sperry Univac 

3 p.m. Computer Contracts— Facing the issues, 

Alan C. Verbit, Verbit and Company 

3 p.m. Accounts Receivable/Accounts Payable/ 

General Ledger 

4 p.m. Using FORTRAN on a Microcomputer, 

Richard A. Zeitlin 

4 p.m. Investment Analysis of Stocks and 

Commodities on a Microcomputer, Fred 
Cohen, Shearson Loeb Rhoades, Inc. 

FRIDAY, OCTOBER 31 

Noon Introduction to Small Systems for 

Business, Stan Veit, Associated Computer 
Industries 

Noon BASIC Programming, Michael Mulcahey, 
Worcester Stage College 
1 p.m. Selecting a Small Computer for Business, 
David Benevy, Computer Mart of New 
Jersey 

1 p.m. Videoprint9: Full-Color, Low-Cost, Hard- 

Copy Computer Graphics, Warren Sullivan, 
Image Resource Corp. 

2 p.m. Mailing Lists: Several Directions, 

Dr. Norman I. Agin, Mathtech, Inc. 

2 p.m. Business Applications Software Develop- 

ment via Data Base Management, 

Dr. Andrew Whinston, Micro Data Base 
Systems 

3 p.m. Application of PASCAL to Small Systems 

for Business, Panel, Stan Veit, Moderator, 
Associated Computer Systems 

3 p.m. Investment Analysis of Stocks and 

Commodities on a Microcomputer, 

Fred Cohen, Shearson Loeb Rhoades, Inc. 

4 p.m. Advantages of Distributed Processing and 

Multi-Processing, John Steefel, Q1 Corp. 

4 p.m. To be assigned. 

SATURDAY, NOVEMBER 1 

Noon Educational Software: The Good, the Bad, 
the Ugly. Jo Ann Comito, S.U.N.Y. at 
Stony Brook 



Noon Introduction to Personal Computing, 

RCA— Solid State 

1 p.m. Computer-Assisted Mathematics Courses, 

Dr. Frank Scalzo, Queensborough 
Community College 

2 p.m. Artificial Intelligence Update, Prof. Peter 

Kugel, Boston College 

2 p.m. Compiling and Retrieving Personal Medical 
Data, Dr. Derek Enlander, St. Luke’s 
Hospital 

2 p.m. The Present State of CP/M Compatible 

Software, Tony Gold, Lifeboat Associates 

3 p.rr High Volume Data Handling: An 

Introduction to File Processing, Prof. Peter 
Kugel, Boston College 

3 p.m. Connecting the Computer to the Outside 

World, Prof. James Gips, Boston College 

4 p.m. Educational Applications in the Home, 

David Ahl, "Creative Computing Magazine" 

4 p.m. Household Applications— Some New, 

Dr. Dennis J. McGuire 

SPECIAL SESSION: EXECUTIVE EDUCATION 
CONFERENCE FOR BUSY PEOPLE 

This year, NSCS will present a special five-hour 
conference formulated as an intensive fast 
education for administrators and executives. 

The aim is to show the conferee how to cope 
with computers in business. No prior 
knowledge of computers is needed. The session 
will proceed on a step-by-step basis, covering 
computers, computer jargon, software systems, 
and peripherals. It will indicate how to assess 
computer requirements, how to talk to vendors, 
and how to make a system work efficiently, after 
you've bought it wisely. 

An executive education session will be given 
daily for four days, Oct. 29 through Nov. 1, in 
the New York Coliseum. Each session is limited 
in attendance, and reservation must be made. 
Registration is on a first-come, first-served 
basis. Fee is $200, and includes three-day 
admission to the National Small Computer 
Show, coffee break, and workbook materials. 
Please write or call the show office for session 
outline and registration form. (Do not use 
registration form in this ad for special session. 

NATIONAL SMALL COMPUTER SHOW 

110 Charlotte Place 

Englewood Cliffs, N.J. 07632 (201) 569-8542 




-REGISTRATION FOR AMERICA’S BIGGEST SMALL COMPUTER SHOW 

Please register me for the 4th Annual National Small Computer Show, Oct 30 - Nov. 1, 1980 New York Coliseum. 

NAME BUSINESS TITLE (If Any) 



COMPANY (If Any)_ 



ADDRESS 

Your company's primary business. Check one. 

9 
10 
11 
12 

13 

14 

15 

16 
17 



1 □ Accounting firm 

2 □ Advertising /Marketing 

3 □ Banking/Insurance/ 

Real Estate/Credit/Securities 

4 □ Communications 

5 □ Computer Consultant 

6 □ Computer Dealer/Dist. 

7 □ Construction/ Architecture 

8 □ Education 

Check your primary job function. 

1 □ Account Executive 

2 □ Administrator 

3 □ Bookkeeper 

4 □ Chemist/Pharm 

5 □ Consultant 

6 □ Corporate Officer 

7 □ C P A. 

8 □ Creative Arts (All) 



□ Engineering 

□ Entertainment/News 

□ Government/Military 

□ Hospital 

□ Hotel 

□ Industrial Design 

□ Law Office 

□ Management Consultant 

□ Manufacturing 



9 □ Designer (All) 

10 □ DP/WP Manager/Operator 

11 □ Doctor 

12 □ Engineer (All) 

13 □ Lawyer 

14 □ Office Manager 

15 □ Programmer 

16 □ Purchasing 



18 □ Personnel Agency 

19 □ Professional Services 

20 □ Research/Development 

21 □ Transportation (All) 

22 □ Utility 

23 □ Wholesale/Retail Sales 

24 □ Other (Please Specify) 



17 □ Salesperson (All) 

18 □ Scientist 

19 □ Skilled Laborer 

20 □ Student 

21 □ Teacher 

22 □ Technician 

23 □ Other (Please Specify) 



TELEPHONE. 
ZIP 



Your primary interest in computers (check only one) 1 □ Business 2 □ Personal 3 □ Both 



□ ONE DAY $10 □ TWO DAYS $20 

□ THREE DAYS $30 

Mail with payment of $10 for each day you 
wish to attend. Use one form per person. Re- 
gistration badge will be sent by mail in early 
October. Check or money order only. 



Mail prior to October 10, 1980. 
Foreign orders: October 1, 1980. 

National Small Computer Show 
110 Charlotte Place 
Englewood Cliffs, NJ 07632 
201-569-8542 
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A Traveler’s 
Restaurant Guide 

BY G. R. BOYNTON 



I am a traveler — at least in a limited 
sense. I go to professional meetings 
between six and ten times a year. And 
one of the pleasures of this travel is being 
able to eat in interesting restaurants. 

For a number of years I’ve thought it 
would be nice to keep a list of restau- 
rants in which I have eaten in order to 
reduce the uncertainty when I return to 
a city two or three years later. But that 
would mean a filing system I’ve never 
felt up to creating and maintaining. 

Enter the Pet! What is a computer if 
not an information system? The result 
is this program which lets me keep 
track of where I’ve eaten and find out 
what I thought of the restaurants before 
taking off for that city again. 

“A Traveler’s Restaurant Guide” is 
built on the assumption that you want to 
keep track of a limited number of res- 
taurants in a number of different cities. 
That assumption provides the basic 
structure of the program. This program 
would not be useful for a person in a 
metropolitan area who wanted to keep 
track of many restaurants in that city. 
But I believe there are many people 
who share my traveling habits. 

The program operates on a series of 
questions and user responses, so it’s a 
rather simple program to use. 

After loading the program you’re 
asked if the data tape is ready or if a new 
tape is being started. The information 
about restaurants is stored on a tape 
which must be read every time the pro- 
gram is used unless a new tape is being 
started. 

Once the data tape is read or you 
answer “NEW”, you are asked if you 
want to INPUT, EDIT or SEARCH. 
Those are the three functions per- 
formed by the program. These are 
separate modules in the program which 

Mr. Boynton is a Professor and Chair- 
man of the Department of Political 
Science at the University of Iowa. 



Program Listing 



100 

110 

120 

130 

140 

150 

199 

200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
500 
510 
520 
530 
540 
550 
560 
600 

899 

900 
902 
904 
906 
908 
910 
912 
914 
916 
958 
960 
962 
964 
966 
968 
970 
972 
974 
976 
978 
980 



PRINT” [CLR] [DN] [DN] [DN] "TAB ( 4 ) ? H A TRAVELER'S RESTAURANT GUIDE" 
PRINT" [DN] [DN] [DN] THIS PROGRAM IS FOR STORING AND" 

PRINT "RETRIEVING INFORMATION ON RESTAURANTS." 

PRINT" [DN] THE INFORMATION IS STORED ON A DATA" 

PRINT "TAPE , AND YOU CAN SEARCH FOR THE REST-" 

PRINT "AURANTS IN THE CITY OF YOUR CHOICE." 

GOSUB 10000 

DIM 1$ (50) ,NA$ (50) , AD$ (50) ,FD$ (50) ,CH$ (50) 

PRINT" [CLR] [DN] [DN] [DN] FIRST THE DATA TAPE MUST BE READ UNLESS" 
PRINT" YOU ARE GOING TO START A NEW TAPE." 

PRINT" [DN] [DN] IS THE DATA TAPE IN TAPE#1 AND REWOUND?" 

PRINTTAB ( 3 ) " [DN] YES" 

PRINTTAB (3) "NO" 

PRINTTAB (3) "NEW DATA TAPE" 

PRINT" [DN] [DN] " s INPUT A$ 

IF A$="NO" GOTO 210 

IF A$=" YES " THEN GOSUB 10100 

PRINT" [CLR] [DN] [DN] [DNJWOULD YOU LIKE TO:" 

PRINTTAB (3) " [DN] INPUT" 

PRINTTAB (3) "EDIT" 

PRINTTAB ( 3 ) "SEARCH" 

PRINTTAB (3) "QUIT" 

PRINT" [DN] [DN] ": INPUT A$ 

IF A$= " INPUT" THEN RO=1 
IF A$= "EDIT" THEN RO=2 
IF A$= "SEARCH" THEN RO=3 
IF A$="QUIT" THEN GOTO 500 
ON RO GOSUB 1000,2000, 3000 
GOTO 300 

IF CG=0 THEN GOTO 600 

PRINT" [CLR] [DN] [DN] [DN]YOU HAVE MADE ONE OR MORE CHANGES TO" 
PRINT"THE INFORMATION. DO YOU WANT TO COPY" 

PRINT"TO THE TAPE?" 

INPUT" [DN] " ?A$ 

IF A$="NO" THEN GOTO 600 
GOSUB 11200 

PRINT" [CLR] [DN] [DN] [DN] HAPPY EATING! ":END 
END 

PRINT" [CLR] [DN] [DN] THE ROUTINES CONTAINED IN THE PROGRAM" 

PRINT" [DN] 1. INTRODUCTION: 100-199" 

PRINT" [DN] 2. READ DATA TAPE?: 200-299" 

PRINT" [DN] 3. ROUTE TO 3 MODULES: 300-399" 

PRINT" [DN]4. INPUT NEW DATA: 1000-1999" 

PRINT" [DN] 5. EDIT FILE: 2000-2999" 

PRINT" [DN]6. SEARCH MODULE: ROUTE (3000-3100); 

PRINT" SEARCH CITY (3300-3599); PRINT ALL (3600-3699)" 

PRINT" [DN] 7. GOODBYE & SEND TO WRITE TAPE: 500-600 
GOSUB 10000 

PRINT" [CLR] [DN] [DN] UTILITY SUBROUTINES" 

PRINT" [DN]1. SPACE BAR TO CONTINUE: 10000-10020" 

PRINT" [DN] 2. READ DATA TAPE: 10100-10160" 

PRINT" [DN] 3 • LIST REGIONS: 10300-10399" 

PRINT" [DN] 4. LIST CITIES IN:" 

PRINT" EAST: 10500-10599" 

PRINT" SOUTH: 10600-10699" 

PRINT" MIDWEST: 10700-10799" 

PRINT" SOUTHWEST: 10800-10899" 

PRINT" WEST: 10900-10999" 

PRINT" [DN] 5. DEFINE RO FOR REGIONS: 11000-11099" 
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982 PRINT" [DN] 6 • WRITE TO TAPE: 11200-11300" 

995 GOSUB 10000 

999 END 

1000 PRINT" [CLR] [DN] [DN] [DN]YOU WILL ADD RESTAURANTS TO THE FILE" 
1010 PRINT"BY ANSWERING A SERIES OF QUESTIONS." 

1020 PRINT" [DN] [DN] IN WHICH REGION OF THE COUNTRY IS THE" 

1030 PRINT "RESTAURANT LOCATED?" 

1040 GOSUB 10300 

1050 INPUT" [DN] [DN] " ? II $ 

1060 LET X$=I1$ 

1070 GOSUB 11000 

1100 PRINT" [CLR] [DN] [DN] IN WHAT CITY IS THE RESTAURANT LOCATED?" 

1110 ON RO GOSUB 10500,10600,10700,10800,10900 
1120 PRINT" [DN] [DN]": INPUT 12$ 

1130 LET N=N+1 

1140 LET 1$ (N) =11 $+12$ 

1200 PRINT" [CLR] [DN] [DN] [DN] WHAT IS THE NAME OF THE RESTAURANT?" 

1210 INPUT " [DN] ";NA$ (N) 

1250 PRINT" [DN] [DN] WHAT IS THE STREET ADDRESS?" 

1260 INPUT " [DN] " ? AD$ (N) 

1300 PRINT" [DN] [ DN ] WHAT IS THE ETHNIC ORIENTATION OR" 

1310 PRINT"STYLE OF CUISINE?" 

1320 INPUT " [DN] ";FD$ (N) 

1350 PRINT" [DN] [DN] HOW WOULD YOU CHARACTERIZE IT?" 

1360 INPUT " [DN] "?CH$(N) 

1990 CG=CG+1 

1999 RETURN 

2000 PRINT" [CLR] [DN] [DN] [ DN ] WHAT IS THE NAME OF THE RESTAURANT?" 

2010 INPUT" [DN] ";RE$ 

2020 PRINT" [DN] [DN] DO YOU WISH TO EDIT:" 

2030 PRINTTAB ( 3 ) " [DN] NAME" 

2040 PRINTTAB (3) "ADDRESS" 

2050 PRINTTAB (3) "ETHNIC OR CUISINE" 

2060 PRINTTAB (3) "CHARACTERIZATION" 

2070 INPUT" [DN] ";A$ 

2080 IF A$="NAME" THEN RO=1 

2090 IF A$= "ADDRESS" THEN RO=2 

2100 IF A$=" ETHNIC" THEN RO=3 

2110 IF A$= "CHARACTERIZATION "THEN RO=4 

2120 FOR J=1 TO N 

2130 IF RE$=NA$(J) THEN ON RO GOSUB 2200,2250,2300,2350 
2140 NEXT J 

2150 PRINT" [CLR] [DN] [DN] [DN]WOULD YOU LIKE TO EDIT SOMETHING ELSE" 
2160 PRINT"ABOUT THIS RESTAURANT?" 

2170 INPUT" [DN]"?A$ 

2180 IF A$=" YES" THEN GOTO 2020 
2185 CG=CG+1 
2190 RETURN 

2200 PRINT" [CLR] [DN] [DN] [DN] WHAT IS THE NEW NAME OF THE RESTAURANT?" 
2210 INPUT" [DN] "?NA$ (J) 

2220 RETURN 

2250 PRINT" [CLR] [DN] [DN] [ DN ] WHAT IS THE NEW STREET ADDRESS?" 

2260 INPUT" [DN] "?AD$ (J) 

2270 RETURN 

2300 PRINT" [CLR] [DN] [DN] [DN] WHAT IS THE NEW ETHNIC OR CUISINE?" 

2310 INPUT" [DN]"?FD$(J) 

2320 RETURN 

2350 PRINT" [CLR] [DN] [DN] [DN]WHAT IS THE NEW CHARACTERISATION?" 

2360 INPUT" [DN]"?CH$(J) 

2370 RETURN 

2999 RETURN 

3000 PRINT" [CLR] [DN] [DN] [DN]YOU CAN EITHER GET THE RESTAURANTS" 

3010 PRINT "LOCATED IN A SPECIFIC CITY OR CAN GET" 

3020 PRINT"THE INFORMATION ON ALL THE RESTAURANTS" 

3030 PRINT"THE DATA FILE." 

3040 PRINT" [DN] [DN] WOULD YOU LIKE:" 

3050 PRINTTAB ( 3) " [DN] CITY" 

3060 PRINTTAB (3) "ALL" 

3070 INPUT " [DN] " ; A$ 

3080 IF A$="CITY" THEN RO=1 
3090 IF A$="ALL" THEN RO=2 
3100 ON RO GOSUB 3300,3600 

3110 PRINT" [CLR] [DN] [DN] [DN] WOULD YOU LIKE TO SEARCH AGAIN?" 

3120 INPUT " [DN] " ; A$ 

3130 IF A$="YES" THEN 3000 
3140 RETURN 

3300 PRINT" [CLR] [DN] [DN] [DN] IN WHICH REGION IS THE RESTAURANT" 

3310 PRINT "LOCATED?" 

3320 GOSUB 10300 
3330 INPUT "[DN]" ? SI $ 

3335 LET X$=S1$ 

3340 GOSUB 11000 continued 



are accessed as subroutines. Choose 
one, and off you go to that module. 
After finishing one of the modules the 
program always returns to this question 
or branching point. 

The INPUT module first asks for the 
region of the country in which the res- 
taurant is located. The program divides 
the country into five regions, and you 
choose one of the five. Then you’re 
asked for the city in which the restau- 
rant is located. Again, cities are 
listed on the screen and you make a 
choice. Finally, four pieces of infor- 
mation about the restaurant are re- 
quested: the name, street address, 
ethnic origin or style of cuisine, and a 
characterization of the restaurant 
(which can be anything you choose to 
save). 

The EDIT routine assumes you know 
the name of the restaurant, and begins 
by asking for the name. Then it asks if 
you want to change: the name, the ad- 
dress, the ethnic or cuisine style, or the 
characterization. If you choose NAME 
then you can type in a new name. And it 
works the same way for each of the 
others. The program replaces the infor- 
mation in memory with what you type. 
While only one change may be made at 
a time, you always go back to the ques- 
tion so as many of the four pieces of 
information about a restaurant can be 
changed as desired. 

The final module is the SEARCH rou- 
tine. You can either print all of the 
items in the data base on the screen, or 
you can find the restaurants located in a 



Program Routines 

Introduction: 100-199 
Read Data Tape?: 200-299 
Route to 3 Modules: 300-399 
Input New Data: 1000-1999 
Edit File: 2000-2999 
Search Module: Route (3000-3100); 
Search City (3300-3599); 

Print All (3600- 3699) 

Goodbye & Send to Write Tape: 500-600 

Utility Subroutines 

Space Bar to Continue: 10000- 10020 
Read Data Tape: 10100-10160 
List Regions: 10300-10399 
List Cities In: 

East: 10500-10599 
South: 10600-10699 
Midwest: 10700-10799 
Southwest: 10800-10899 
West: 10900-10999 
Define Ro for Regions: 1 1000-11099 
Write to Tape: 1 1200-1 1300 
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single city. To find the restaurants in a 
specific city you answer “city.” The 
program asks for the region of the 
country, then the city. Once the city is 
specified, the program displays all of 
the restaurants from that city in the data 
base. 

“Restaurant Guide” keeps track of 
changes made in the data during its 
operation. If a restaurant was added or 
editing performed, the program notes 
this. When you say QUIT it will tell you 
that changes have been made and ask if 
you want to write the changes on the 
data tape. To rewrite the data tape, 
make sure it is rewound and in tape # 1 . 

The program is very simple. It lets 
you input and edit information on res- 
taurants. Then it will print this infor- 
mation for the city you select. Ob- 
viously, the program could be written 
to do more than this, but with personal 
computers come personal programs. 
And this does what a traveling person 
needs done. 

The program is written in Pet Basic. 
Documentation is included in a rather 
unusual manner. Instead of many 
REMark statements scattered through- 
out the program, the equivalent of such 
remarks are collected in lines 900 
through 999. If you type RUN 900 it 
will first tell you the line location of all 
of the major segments of the program. 
Then it will give the line location of all 
of the major subroutines. You can find 
any major part of the program by 
simply typing RUN 900. I find this 
procedure very handy in both writing 
programs and in revising them months 
later. It is rather like a table of contents 
to the program. 

The program is designed as a series 
of branching points and subroutines. In 
these subroutines are other subroutines 
used for operations in several parts of 
the program. There is a considerable 
amount of English text built into the 
program, but this structure reduces the 
RAM used. With the documentation 
(lines 900 to 999) the program requires 
5043 bytes of RAM. Without docu- 
mentation, only 4222 bytes are re- 
quired. 

There’s one feature of the program 
that you may want to change. My cities 
may not be your cities. I have included 
2 or 3 for each region. The names of the 
cities are included in subroutines in the 
program, one subroutine for each 
region. The location of each subroutine 
is given in the documentation (lines 900 
to 999). It is a straightforward matter to 
add and subtract cities. 

As the program concludes: GOOD 
EATING. □ 



3350 PRINT" [CLR] [DN] [DN] IN WHAT CITY IS THE RESTAURANT LOCATED?" 
3360 ON RO GOSUB 10500,10600,10700,10800,10900 
3370 INPUT " [DN] " ? S2$ 

3380 LET SE$=S1$+S2$ 

3390 CO=0 

3395 PRINT" [CLR]" 

3400 FOR K=1 TO N 

3410 IF SE$=I$(K) THEN GOSUB 3500 
3420 NEXT K 

3430 IF CO=0 THEN PRINT"NO RESTAURANTS HAVE BEEN FOUND FOR THAT 



CITY." 

GOSUB 10000 

RETURN 

CO=CO+1 

PRINT" [DN]"; NA$ (K) 

PRINT AD$ (K) 

PRINT FD$ (K) 

PRINT CH$ (K) 

IF INT (CO/3 )= (CO/3) THEN GOSUB 10000 
IF INT (CO/3 )= (CO/3) THEN PRINT H [CLR] " 

RETURN 
PRINT" [CLR] " 

FOR J=1 TO N 

PRINT" [DN]" NA$(J) SPRINT AD$ ( J) SPRINT FD$ (J) SPRINT CH$ (J) 
IF INT ( J/3) = ( J/3) THEN GOSUB 10000 
IF INT (J/3) = (J/3) THEN PRINT "[CLR]" 

NEXT J 
GOSUB 10000 
RETURN 
PRINT" [HM] " 

FOR DN=1 TO 20 
PRINT" [DN] "; 

NEXT DN 

PRINT "PRESS THE SPACE BAR TO CONTINUE" 

GET SP$ s IF SP$="" THEN 10050 

RETURN 

OPEN 1 

INPUT# 1 ,N 

FOR K=1 TO N 

INPUT# 1 , 1$ (K) , NA$ (K) ,AD$ (K) ,FD$ (K) ,CH$(K) 

NEXT K 
CLOSE 1 
RETURN 

PRINTTAB ( 3 ) " [DN] EAST" 

PRINTTAB(3) "SOUTH" 

PRINTTAB ( 3 ) "MIDWEST" 

PRINTTAB (3) "SOUTHWEST" 

PRINTTAB (3) "WEST" 

RETURN 

PRINTTAB (3) " [DN] BOSTON" 

PRINTTAB ( 3 ) " NEW YORK " 

RETURN 

PRINTTAB (3) " [DN] ATLANTA" 

PRINTTAB (3) "NEW ORLEANS" 

PRINTTAB (3) "WASHINGTON" 

RETURN 

PRINTTAB (3)" [DN] CHICAGO" 

PRINTTAB (3) "MINNEAPOLIS" 

PRINTTAB (3) "ST. LOUIS" 

RETURN 

PRINTTAB (3) " [DN] HOUSTON" 

PRINTTAB (3) "SAN ANTONIO" 

RETURN 

PRINTTAB (3) " [DN] LOS ANGELOS" 

PRINTTAB (3) "SAN FRANCISCO" 

RETURN 

IF X$= "EAST" THEN RO=1 
IF X$=" SOUTH" THEN RO=2 
IF X$= "MIDWEST" THEN RO=3 
IF X$= "SOUTHWEST" THEN RO=4 
IF X$="WEST" THEN RO=5 

RETURN 



3450 
3460 
3500 
3510 
3520 
3530 
3540 
3550 
3560 
3570 
3600 
3610 
3620 
3630 
3640 
3650 
3660 
3670 
10000 
10010 
10020 
10030 
10040 
10050 
10060 
10100 
10110 
10120 
10130 
10140 
10150 
10160 
10300 
10310 
10320 
10330 
10340 
10350 
10500 
10510 

10599 

10600 
10610 
10620 

10699 

10700 
10710 
10720 

10799 

10800 
10810 

10899 

10900 
10910 

10999 

11000 
11010 
11020 
11030 
11040 
11050 

11200 OPEN 1,1,1 
11210 PRINT# 1 ,N 
11220 FOR K=1 TO N 
11230 PRINT# 1 , 1$ (K) 
11240 PRINT# 1 ,NA$ (K) 
11250 PRINT# 1,AD$(K) 
11260 PRINT# 1,FD$(K) 
11270 PRINT# 1 , CH$ (K) 
11280 NEXT K 
11290 CLOSE 1,1,1 
11300 RETURN 
READY. 



Definitions of Translations 



[CLR] 


CLEAR SCREEN- 


[DN] 


CURSOR DOWN 


[UP] 


CURSOR UP 


[HM] 


CURSOR HOME 


[LC] 


CURSOR LEFT 


[RC] 


CURSOR RIGHT 


[RV] 


REVERSE 


[RVOFF] 


REVERSE OFF 
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Sample Run 

A TRAVELER'S RESTAURANT GUIDE 

THIS PROGRAM IS FOR STORING AND 
RETRIEVING INFORMATION ON RESTAURANTS. 
THE INFORMATION IS STORED ON A DATA 
TAPE, AND YOU CAN SEARCH FOR THE REST- 
AURANTS IN THE CITY OF YOUR CHOICE. 

FIRST THE DATA TAPE MUST BE READ UNLESS 
YOU ARE GOING TO START A NEW TAPE. 

IS THE DATA TAPE IN TAPE#1 AND REWOUND? 

YES 

NO 

NEW DATA TAPE 
YES 

WOULD YOU LIKE TO: 

INPUT 

EDIT 

SEARCH 

QUIT 

SEARCH 

YOU CAN EITHER GET THE RESTAURANTS 
LOCATED IN A SPECIFIC CITY OR CAN GET 
THE INFORMATION ON ALL THE RESTAURANTS 
THE DATA FILE. 

WOULD YOU LIKE: 

CITY 

ALL 



CITY 

IN WHICH REGION IS THE RESTAURANT 
LOCATED? 

EAST 

SOUTH 

MIDWEST 

SOUTHWEST 

WEST 

WEST 

IN* WHAT CITY IS THE RESTAURANT LOCATED? 
LOS ANGELOS 
SAN FRANCISCO 

SAN FRANCISCO 

RUE LEPIC 

900 PINE STREET 

CONTINENTAL 

SMALL AND QUIET WITH EXCELLENT FOOD AT 
MODERATE PRICES ? RESERVATIONS NEEDED 

NORTH BEACH RESTAURANT 
1512 STOCKTON STREET 
ITALIAN 

TENDS TOWARD ELEGANT WITH EXCELLENT FOOD 
AT HIGH PRICES ? RESERVATIONS NEEDED 

CASABLANCA 

OUTER EDGE OF CENTRAL CITY 
ITALIAN 

MEDIUM SIZE? I LOVED THE VEAL AND DESERT 
7 MODERATE PRICE 




Introducing 





\ 

60 Cycle 

Sine Wave 
U.P.S. 

(Uninterruptibe Power Supply) 

• •••for those systems that need 

60 cycle sine wave keeps 
computer & disk systems 
on when the power goes 

out For less than $500.00* 

• •••Rated 250 Watt 

continuous operation 

• •••will provide 400 Watts 

for 5 minutes 
(Model II TRS-80 
with 4 disk drives) 

* Standard MAYDAYS available 
starting at $195.00 for 150 Watt 
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Extended Basic 
for Your TRS-80 



BY WILLIAM F. STOCKWELL 



T his disk-based Basic program 
augments Level II/Disk Basic on 
the TRS-80. Essentially, the program 
allows you to input lines of enhanced 
Basic source code and then translates 
the code into Level II Basic. You may 
save the resulting Level II program on 
disk for normal usage. (Note: When I 
say Level II, I’m referring to TRS-80 
Disk Basic). You should have 48K of 
RAM to use this program because, 
although the program itself is only 
about 12K, it eats huge amounts of 
string space and array space. It 
wouldn’t be difficult to alter the pro- 
gram to run on a 32K system, however. 

The enhancements to Basic include 
statements for matrix/vector manipu- 
lations, DO WHILE and DO UNTIL 
statements, a more powerful instring 
function called SUBSTR, and the ability 
to create useful subroutines. 

I am not very familiar with the Basics 
used on other microcomputers but from 
what I have seen, you could easily 
adapt the ideas used in this programs to 
other systems. 

When you run this program (called 
“Extend”), here’s what happens: First, 
it prompts you to enter the file name of 
the program you wish to write. After 
this, you are in the Extended Basic 
monitor mode as indicated by the LINE 
INPUT prompt — the cursor. At this 
point, the computer is waiting for one 
of two things: either a line of source 
code (a programming statement) or a 
system command. The machine dis- 



tinguishes between the two by the 
presence (or absence) of a line number. 

System commands are RUN, NEW, 
LIST, LUST and a few others, notably 
TRAN (translate into Level II). 

Usually, you input program lines 
(with line numbers) and, when you 
have entered the whole program, type 
in the system command TRAN. Your 
program is now translated into Level II 
Basic, and you are returned to the 
Monitor mode, presumably to issue the 
System command RUN (or possibly 
SAVE). 

RUN will save your program on disk 
(under the file name you gave it at the 
beginning) and proceed to run it — 
wiping Extend from memory in the 
process, of course. SAVE simply saves 
your program without RUNning it. 
UST and LUST work as usual, while 
NEW lets you start all over (it simply 
re-runs the Extend program). Another 
command, LOAD, will load the file 
whose filename you issued at the be- 
ginning from disk. It should be a file 
created by the Extend program. 

Any time you need a list of available 
system commands, type COM (Enter). 

Editing of your programs is rather 
limited. You can enter the lines of your 
program out of sequence and they will 
be properly ordered. If you wish to 
replace a line, retype it. To delete a 
line, you must use the System com- 
mand DEL. For example, DEL 20 
would delete line 20. You can only 
delete one line at a time. 



Errors in your program will be de- 
tected during the translation process, 
which is halted as soon as the first error 
is found. Extend has error reporting and 
will usually indicate the type of error 
and the line in which the error occurred. 

It’s important to understand the 
translation process. The translator 
scans the source code a line at a time, 
using the INSTR function to locate 
keywords. If a REM is found, the line is 
ignored; if no enhanced Basic key- 
words are found, Extend assumes the 
line is a standard Basic statement and 
goes on to the next line. 

If an enhanced Basic keyword is 
found. Extend inserts “REM” into the 
line (otherwise a SYNTAX ERROR 
would occur when you try to run the 
program!) and then inserts the appro- 
priate translated line immediately 
afterwards. For this reason, you 
shouldn’t use consecutive line numbers 
in your program. 

Some enhancements can’t be simu- 
lated by inserting a single line. When 
this happens, an entire subroutine is 
inserted (starting with line numbers no 
lower than 29000). You may wish to 
include an END statement at the end of 
your original source code so the pro- 
gram won’t accidentally crash into a 
subroutine. 

It’s also a good idea to define vari- 
ables I through N to be integers in your 
enhanced Basic programs as this speeds 
up execution since the translator 
assumes these to be integers and uses 



Figure 1 



I MULTANEOUS EQUATIONS EXTEND VERS I OM 



3.0 CLS: DEFINT I - M = ? ** -***- SIMULTANEOUS LINEAR EQUAT I O 

MS ***" s ? 

30 I NROT '* ENTER TME NUMBER OR EQUATIONS" ? MM 

30 M 1 “MM s W3 = MM = M3 = NM 

A 0 PRINT"ENTER THE COEFFICIENTS, ONE AT A T I ME > BY ROWS = " 

50 MAT INPUT E?- 

<£>0 DIM C<NN, 1 > 

30 M3=l 

S0 PRINT-NOW ENTE R THIS RIGHT HAND SIDE COEFFICIENTS, ONE AT A TIMS 

E?0 MAT INPUT C 

100 REM WE MOW SOLVE THE MAT R I XYEGTOR EOOAT I OM E-*-X=*G» F*OR X 
110 MAT A *** I NV ( B ) 

1 iL'0 M3 — MM = M3— 1 * SO WE CAM MULTIPLY A BY C 

3 30 DIM X < MM * 1 > 

1A0 MAT X “ A -x- O 

150 CLS 

J O0 RE I MT " SOLUT I OM s •• 

N2.-1 

130 MAT RRIMT X 

1 S0 EMD 
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them as such. Actually, it restricts itself 
to variable names starting with K and 
N, for the most part. 

In general, only one enhanced Basic 
statement may appear on any one line 
and it must appear alone. For example, 
you couldn’t say: 

10N1 = 1: MAT INPUT A 

It would have to be: 

5N1 = 1 

10 MAT INPUT A 

Multi-statement lines are acceptable, 
but only if all the statements are stan- 
dard Basic. 

Do not use enhanced Basic keywords 
anywhere in your program except in the 
actual programming statements! For 
example, you can’t say 

10 PRINT “ENTER THE MATRIX” 
since “MAT” is a keyword even 
though it is between quotes. This 
problem tends to crop up a lot, so be 
careful. 

Now for the actual enhancements. 
Most of the usual Matrix statements are 
here. They are: 

MAT INPUT array name 

MAT PRINT name 

MAT name! = name 2 

MAT name — ZER [Zero out a matrix ] 



MAT 


name = IDN [Set matrix = 
identity] 


MAT 


name! = TRN (name 2 ) [transpose] 


MATA 


= INV (B) [matrix inverse] 


MAT 


name! = name 2 4- name 3 
[matrix addition] 


MAT 


namei = - name 2 [e.g., A = - B] 


MAT 


name! = name 2 * name 3 
[multiplication] 



On matrix inverse, you must use the 
array names A and B; that is, you must 
invert matrix B and set matrix A equal 
to the inverse. 

The Extend translator uses the vari- 
able names N1 , N2, N3 and NN when 
dealing with matrices, and you must 
use them also. When inputting or print- 
ing a matrix, N1 equals the number of 
rows and N2 equals the number of col- 
umns. In general your matrix is con- 
sidered to be N1 by N2, and you have to 
set up the size of your matrices in your 
program, using these same variable 
names. Thus, to input a 3 x 3 matrix: 

10 N1 = 3 : N2 = 3 
20 MAT INPUT A 

For most purposes, this is all you 
need. To do matrix multiplication, the 
first factor is assumed to be N 1 by N2, 



the second N2 by N3. Also, to do a 
matrix inverse or determinant, set NN 
equal to the order of the (necessarily 
square) matrix. There is a built-in 
determinant function: 

S = DET (A) 

[where A is an NN by NN matrix ] 

Of course, you can use any variable 
name instead of S. 

Extend does not allow arbitrary use 
of built-in functions. For example, you 
can’t say PRINT DET (A) or A = A + 
DET (Z); functions can only be used in 
simple assignment statements. When 
using DET, you need to DIMension the 
array DT as NN by NN (NN = order of 
your matrix) if this order exceeds 10. 

Other built-in functions allow vector 
dot and cross products. Vectors should 
be dimensioned as N 1 by 1 for dot and 
cross products (so as to be compatible 
with matrix multiplication). Syntax is: 
DOT S = <A,B> 

which sets S (or whatever variable 
name) equal to the dot product of 
vectors A and B . For the cross product, 
VEC A = B * C 

sets vector A to B times C (cross 
product). 

For single dimension vectors, there 
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SIMULTANEOUS EQUATIONS 



after translation 



10 CLSSDEFINT I — N s'?” •*•**-*- SIMULTANEOUS E T KIEL A R EQUAT I O 

|v|£“» -K yfr “s'? 

20 IMPUT"ENTER THE NUMBER OF EQUATIONS" 5 NN 

30 N 1 = M M r N2 — IMN = M 3 = N N 

A0 PRI NT ** ENTER THE COEFF I C I ENTS * ONE AT A TIME* BY ROWS = ” 

50 REM MAT INPUT B 

3 1 FORK 1 = 1 TON 1 = FORKS* 1 TONS = I NPUTB < K 1 * K2 > = MEXTK2 * K 1 

60 DIM C C NN , 1 > 

30 N:2= 1 

€30 RR I NT" NOW ENTER TME RIGHT HAND SIDE COEFF I G I ENTS * ONE AT A TIME 



90 REM MAT INPUT C 

3 1 FORK 1 = 1 TON 1 = FORK 2= 1 TONS * I N PUT C C K 1 •» K2 ) = NEXTK2 ■» K 1 

100 REM WE NOW SOLVE THE MATRIX VECTOR EQUATION R.o*X = C* FOR X 

110 REM MAT A=INV<B > 

111 GOSUB 30000 

120 N2-NIM : N3 = 1 ’SO WE CAN MUETIRLY A BY C 
1 30 DIM X < NN ■» 1 > 

1 A0 REM MAT X = A •* C 

1 A 1 FORK 1 = 1 TON 1 r FORI\2= 1 TONS s X < K 1 » l<2 > =0 * FORK3= 1 TO M2 s X < K 1 * K2 > =X < K 1 * K 

2 > • »- A < K 1 * K3 > * C < K3 * K2 > s NEXTK3 * K2 * K 1 

130 CES 

1 A0 PRINT" SO L- OTTO N r" 

J A 3 N2- 1 

130 REM MAT PRINT X 

1 ~7 1 FORK 1 *** 1 TON 1 = *? s FORI<2= 1 TONS e RR I NT X < K 1 ■» K2 > “ = NEXTK2 * K 1 
1O0 END 

30000 FORK 1 = 1 TOMN = FORK2= 1 T ON LI r A < K 1 * K2 > = < K 1 = K2 > = NEXTK2 * K 1 



300 1 0 FO RK 1 = 1 TONN — 1 
3 0 0 2 0 K C = 1 

30030 I FB ( l\ I , K I > < >0THEN30030 



2 > ? Ch R*i < 33 > 5 cHr?|; < 

3 TOR 



300 A 0 I FK I -*-K C > N NTI-IEMPR I NT Cl IR*S* < ~7 G > 5 CHR*i < 33 > ? CIHRT < 3: 

30 > ;Ch < O A > 5 cHr ^ < A V > * Ch < ©2 > 5 cHr$ < ©3 > ?Ch RUi < A3 > = i 

3003 0 11 = 1 “I 2 = K I -il< C * KC = KC 1 s GO3UB302 1 0 

300A0 GOTO 30030 

3003 0 I 1 = K I s X K= 1 /B < K I * 1< I > s GOSUO30 1 30 
30000 FORKJ=K I « 1 TONN 

30030 XK*-D(KJ»KI > " I 2 = K J = GOSUB30200 
30100 NCXTK J » KI 

30 110 I FB < NN * NN > =0TI IENRR I N T CH RT < TO > 5 C! IR^» < 33 > 5 Cl IR+ < 32 > S CHRiH < 33 > ? Cl JR 

F. < 30 > 5 Cl !RT. < O A > “ CHR^ < A3 > ? CI IR1> < 02 > s Cl IRtfr < 03 > 5 Cl IR^J < A3 > * STOR 

30 1 20 XK 1 / R. < Nlxl v NN > r I 1 NN s GOGUB30 1 30 
30 130 FORK I =MNT02STEP- 1 
30 I A0 II =K I 

30150 FORK J = K I -- 1 TO 1 STER- 1 

30 1A0 XK= B<KvT> KI > r- I 2”KJ r GOCUB3W200 

30 170 NEXTKJ v KI 



3 if’ 1 O 0 R E T U R N 

30 130 FORKK-- 1 TONN ? A < I 1 » KK > *»XK* A < I 2 . « KI : > ?B < X 1 * KK > “XK*0 < I 1 v KK > r NEXT « R 



[T.TURN 

30200 I O RKK= 1 TONN “ A < 12* l\K > =A <12, KK > -*~X !<-» A < .T 1 » KK > r r* <12, KK > < I 2 » KK > •» 

: :i : * o <: z i * kk > r next r retorn 

3021 0 rC'RKK- 3. TONN * CC A <11* KK > s A < I 1 * l.'K > =A < 12 , KK > r A < X2 . KK > =CC - CC-B < I 

1 :\K > “ O- < X i * KK > =B < I 2 » KK > r F < 12* K!*C » *» C C * NEXT r RETURN 
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are two functions available. The 
statement: 

S = SUM X, 1, N 

sets S equal to X(l) 4- X(2) + . . .+ 
X(N), and you may start and end the 
sum anywhere, using variables or con- 
stants. There is nothing special about 
the array X — any variable name may 
be used. Only the matrix inverse rou- 
tine requires specific variable names. 

You can also multiply array elements 
together in a similar way: 

P = PRD A, 1, N 

so that P = A(l) * A(2) * . . .* A(N). 

For those who like structured pro- 
gramming, there are the DO WHILE and 
DO UNTIL statements. For example: 
101 = 1 

20 DO WHILE I < 10 
30 S = S + I 
401 = 1+ 1 
50 END WHILE 

This program (when translated and 
run) would set S equal to 1 + 2 + 3 
+ . . . + 9. DO UNTIL works similarly. 
These loops may be nested. The condi- 
tion following DO WHILE or DO UNTIL 
may be any logical expression, for 
example, DO UNTIL A$ = “ ” or DO 
WHILE NOTEOF(l). 

The INSTR function of Disk Basic is 
nice but only finds the first occurrence 
of a substring within a larger string. 
The SUBSTR function of Extend finds 
all occurrences. The information is 
recorded in array KK as follows: 

KK(0) = the number of occurrences, 
KK( 1 ) = the position of the first occur- 



rence, 

KK(2) = the position of the second 
occurrence, etc. 

For example, suppose A$ = “YES- 
NO YES YES” and B$ = “YES”. Then 
the statement SUBSTR A$, B$ would 
cause KK(0) to equal 3 (3 occurrences 
of “YES” within A$),KK(1) = 1 (first 
“YES” starts at position 1), KK(2) = 
6, KK(3) = 9. 

The final enhancement of Extend is 
potentially the most powerful. The 
function allows you to create and call a 
new kind of subroutine which I call a 
“procedure,” as in PL/1. The nice 
thing about “procedure” is that it can 
call itself, allowing you to do recursive 
programming. For example, a proce- 
dure called POWER could compute 
X | Y and would appear as: 
POWERiPROC (X,Y) 

Z = Xt Y 
END POWER 

Note that any parameters you wish to 
pass are contained in a list following the 
keyword PROC. Parameters are not 
required, however, and you can pass 
any variable names to the procedure not 
just the ones used in the procedure. For 
example, 

CALL POWER (A,B) 
would set Z = A | B and return to the 
statement following the CALL. 

To do recursive programming, you 
would put a call statement within your 
procedure which should only be exe- 
cuted under certain conditions, other- 
wise, you would get involved in an 



infinite loop. Normally, parameters 
would be continuously modified by 
successive CALLS until a desired condi- 
tion is satisfied. 

As a simple example of recursive 
programming, here is a program (in 
extended Basic, prior to translation) to 
find a root of an equation using bi- 
section: 

5 REM DEFINE FUNCTION IN 
LINE 10 

10 DEF FNF(X) = X * X — 2 
20 INPUT “ENTER A,B”; A,B 
30 CALL BISECT (A,B) 

50 BISECT: PROC (L,U) 

60 M = (L + U)/2 

70 IF ABS(FNF(M)) < IE - 5 THEN 120 
80 IFFNF(L) * FNF(M) < 0THEN 100 
90 CALL BISECT (M,U) 

100 CALL BISECT (L,M) 

110 END BISECT 

120 PRINT “ROOT = ”; M 

130 END 

Line 80 determines whether the root 
lies between L and M or between M and 
U. It then calls BISECT again with 
appropriate parameters (either (L,M) or 
(M,U) ). 

A Sample Run of Extend would be 
more confusing than helpful, so I have 
presented the results of a run. I wrote a 
program to solve simultaneous linear 
equations in extended Basic and then 
had Extend translate it into Level II . 
The results appear in the Figures 1 and 
2. Note the comparative brevity of the 
Extend version. 



*--*--*- EXTEND MAIM PROGRAM 



1 0 CLS = CLEAR 1 5000 : DEF I NTA-W : D I MT^ ( 600 ) ■* L < <£>00 > 9 A < <£>00 ) ■» PR* ( 5 0 ) ■> PAT < 5 

0 > ■» PL(50) , YT < SO > , WT < SO > 

:S0 PRINT" EXTENDED E?.AS I C ** SPRINT 

30 INPUT M ENTER R I LENAME OR YOOR PROGRAM" " RT 

AO CLS = PRINT" EXTENDED BAS I C -**•-**--*•" s PRINT s 1= — 1 

5 0 I — I -*~S 

60 I I NE I N POT TT < I > = 1 FVAL < T T < I ) > — OTMEN 1 TO 

TO A < I > — I NSTR < TT < I> , " " ) = I R A < I > —OPR 1 NT ” PLANK MOST R OLLOW L I NE NOME 

ER REENTER LAST LINE" = GOTO<£>0 

SO L < I > = VAI < LEETT <TT<I>*A<I>— 1> > = I E I — 1. TMEN50 

S>0 I RL < I ) > L C I — S > THEN50 

1 OO RORJ = 1 TO I — SSTEPS = I RL < I > < = L < «J > THEN 1 SO 
110 NEXT 

1 SO I RL < I > — L < LT > THE NTT < LT ) — TT < I > = TT < I > — " " = A<J> —A (I>=L<LT> — L < I > s|_<I> = 0 

= GOT O <£> 0 

1 30 TT = TT < I > = I — I < I ) = A — A C 3 > 

1A0 FORK= I TO J+2STEP-S : T$ ( K ) =T$ ( K~2 ) = A < K > — A < K — S > = L < K > — L < K— -S > - NEXT 

150 T * ( JT ) =T * : A < JT > =A : L < J ) —L 
160 GOT 050 

1 TO CT = TT C I > = TT <!>="" = DT — LERTT < CT ■» 3 > s LL=LEN < CT > 

ISO I = 0 

190 I E C T — " COM " T H E N S 9? 0 

SOO I R CT = " RON " TMENAZ=— 1 = GOTO A A O 

S10 I EDT= " DEL " THEN L = Y AL < R I GMTT < CT ■» LL — A > > 

SSO I EDT— '* L I S " TMENS A0 ELSE I EDT— " LL I " TMEN3S0 ELSE I T DT** " BL I " THLN38 

O ELSE I EDT = " SAY " TMENAAO ELSE I EDT = " LO A " TMEN5 SO ELSEIRDT— " NEW" THE 

N620 ELSE I EDT = " DEL " THEN630 ELSE I EDT — " T R A " THEN<£><£>0 

S30 PRINT" ILLEGAL COMMAND" = GOT O<£>0 

SAO CLS s RORJ=lTOI — 1 

S50 1 ETT C J > = " " TMENSTO 

S<£»0 P R I N T T T < J" > 

27 O NEXT 
SSO GOT O<£>0 

290 PR I NT " SYSTEM COMMANDS A RE = 

300 PR I NT " L I ST ” = PR I NT " LL I ST " = PR I NT " BL I ST < LL I ST IN LARGE CHAR M 

ODE > " 

"3 10 PR I NT "DEL < L I NE *+ > ” 

320 PR I NT " SAVE " 
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330 
340 
350 
3<£>0 
3*7 0 
3B0 
3«70 
-4 00 
-4 1 0 
42:0 
-430 
-4-4 0 
45 0 
A <£>0 
4T0 
-4 00 
490 
500 
5 10 
5 220 
530 
5-40 
550 
5 <£>0 



RR I NT * 
RR I NT * 
RR I NT * 
RR I NT ' 



LOAD * 
ROM '■ 
NEW 
TRAM 



< START OVER ) " 

(TRANSLATE SOURCE CODE I MTO LEOEL 



’ THENET=CHRT < 1 5 > 



2 0 



- F I LEM AME * 



* I MSTR ( TT ( T > 



RR X MT = G O T 060 
ET=" *■ s IEDT="BLI 
FORT— 1 TO I — 1 
I ETT c T > = M " TMEN4 
LRR I NTET ? T T ( T > 

MEXT 
G O T 060 

IFF$-" ” THEM I M RUT 
OREM " O " * If F T 
F O RJ = 1 TO I — 1 
RRIMT4+1 * T^ ( J ) 

MEXT 
CLOSE 

I FAZTHENRUNF$ 

GOT 060 

OM ERROR GOTO 5S0 
OREM " I " -, 1 , F$ 

T = 0 
T — T -+- 1 

LIME INPUT** 1 * TT ( J > = A<T> 

A < T > ) ) 

5~70 GOT 0550 

500 I FERR= 1 06THEN6 1 0 

5*90 I FERRO 1 224TMENONERRORGOTO0 
<£>00 I = T = CLOSE= RESUME60 

<£>10 CLOSE = PRINT" FILE MOT FOUND” = RESUME60 
<£>220 RUM 

A30 F O R T = 1 T O I — 1 = I F L ( O') =LTHEN650 
640 ME XT = PRINT" MO SUCH LIME” = GOTO<£>0 

<£>5 0 TT < T > = ” " = A < O’ > =0 = 1 ( O' ) =0 = G O TO60 

<£><£>0 CLS=RRIMTS»A00, "EXTENDED SASIC TRANSLATOR— 
670 M — I — 1 
<£>S0 0 — 0 

<£><70 O — O 1 

V 00 I FO< = NTMEN*7<£>0 

~7 1 0 GO SUE- 3000 ’ PROCESS ALL THE ’CALLS’ 

17220 I FFETHEMGOSUB 1920 
V 30 I FFLTHENGOSUB2050 
740 I FFDTHEMGOSUB26 1 0 

“750 CLS= PRINT" TRANSLATION COMPLETE 

SACK TO EXTENDED SASIC MONITOR" = GOTO60 
“7<£> 0 I FT T ( O ) = " " TMEN<£><70 



> :L(T) =VAL < LEFT T < TT ( O ) 



TV 0 
TO0 
79*0 
O00 
S 1 0 
OS0 
030 
0-40 
050 
S<£>0 
S'7 0 
OO0 
S<70 
900 
910 
c ? 2 ‘ 0 
<730 
90) 
940 



‘ REM ' 
1 DOT * 
1 OEC * 
1 MAT • 
' DET 1 
' SUM * 



> < > 0 T M E N <£> <7 0 

> O0THEM2290 
) < > 0THEN2400 
) < >0THEM 1 5 30 

> < > 0THEI^12‘490 

> <>0TMEMO C Z0 



I F I MSTR < TT ( O ) 

IFINSTR(TT(0> 

IFINSTR(TTCO) 

I F I MSTR ( TT ( O > 

I F I MSTR ( TT ( O > 

I F I MSTR (T $ ( J ) 

IFIMSTR ( TT < T ) 

IFIMSTR ( T T ( T > 

IFINSTR(TT<0) 

I F I MSTR C TT ( O ) 

IFIMSTR ( TT < T > 

GOT O<£>90 

T X T = T T < T ) = GOSUB 1SA0 

B = I MST R < T X T ■» " = " > = I FB = 0THEM990 

T T — M I 13 T ( TXT, A ( T > -»- 1 -, B — ACT) — 1 ) 

B— I MSTR < TXT ■» "SUM " > = I FB — 0THEN<7<70 

LL==LEM ( TXT > = L T — R I GMTT ( TXT, LL — S — 3 > = C1 = 



' PRO C " ) O0THEM2860 
1 RRD" ><>0TMEM1000 
UNTIL" ><>0TMEM1310 
■ WH I LE " > < >0THEM 1110 
-SUBSTR" ><>0TMEM1O50 



I MSTR ( LT i 



> = I F C 1 = 0 T M E N <7 



1 > = L T — R I G M T T CLT-,LL— Cl > = C2= I MSTR ( LT - 



IT— RIGMTT C I — T ■» L L — C 1 > 

= R I GMT T ( MT -, LL — 1 > 

-ST* " TO " -*E T -*- " s " -*- T T 1 



- L < T ) s G O TO60 



' T T * 



: C 1 = I MS T R < L T » 



) s I FC 1 — 0TMEN 
* I MSTR < I — T -» 



’ -4-TTh 



= 1 — EM < LT ) = AT — LEFT T < LT , Cl- 
, " ) = I F C2=0THEM990 

<750 LL = I EM ( LT > = ST — LEFT T < L T C22— 1 ) = E 

<7<£>0 MT = STRT < L < T ) 1 > s LL==LEM < MT > = M T = 

970 T$ ( T+l >=NT-*-" " h-T T-*-" —0 s FO RKK= " h 

" < KK ) sMEXTKK" 

^00 GOTO<£>S>0 

c ?<9 > 0 PRINT" ILLEGAL USE OF SUM IM LIME 
1000 TXT = TT < T > sGOSUBlO-40 

10 10 B— I MSTR (TXT-, " = " > = I FB = 0TMEM 1 1 00 

1 02L-0 TT = M I DT ( TXT -* A ( T ) -H 1 , S — A ( T ) — 1 ) 

1030 S- = I MSTR ( TXT, "RRD " > = I F B = 0 T M E M 1100 

10-40 LL = LEN ( TXT > s LT=RIGMTT ( TXT f LL — B* — 3 > : 

1 1 00 

1050 LL = LEM(LT> s AT==LEFT T ( LT , Cl — 1 ) = LT=RI GMTT ( LT, LL— Cl > = CH 
” » " > = I F C2-0THEN 1 100 

1 060 L L = L E N ( L_ T ) s ST — LEFT T ( LT , C2- 1 > sET = RI GMTT (LT»LL — Cl) 

10~7 0 NT — STRT ( L ( vT > 'i. ) = L L = LEM < MT ) = NT = R I GMTT ( MT f LL — 1 ) 

1 0O0 TT(T-*-l ) — M T T T " = 1 = FO RKK '= " -»-S T " T O " ET " = " -*-TT-f- " = 1 
-+- " ( KK > = ME X TKK ” 

10«?0 GOT 0690 

1100 PRINT" ILLEGAL USE OF RRD IM L I ME " 5 L ( JT > s GOTO<£>0 
1110 T X T = T T < «J ) K GOSUB 1 0-4 0 s B= I MSTR (TXT-, " DO " ) = I FB = 0TMEM<£> c P0 
1 1 2L-0 i — L — LEM ( TXT > = B= I MSTR (TXT, "WHILE " ) s I FB = 0TMEM 1 520 

1130 CT=R I GMTT ( TXT , LL— B— 5 > 

1 1 -40 M — 1 

1150 FORK — J-+- 1 TOI — 1 

1 1 <£>0 C — I MSTR ( TT ( K ) , "WHILE" > = IFC = 0TMEM1 210 

1 1 T0 D — I MSTR ( TT ( K ) ■» " DO " ) = E= I MSTR ( TT ( K > * " END " ) 

1 1 B0 I FD— 0AMDE— 0TMEMRR I MT " ILLEGAL STATEMENT IM LIME" ?L(K) :GOTO60 
1 1 90 I FD< >0TMEMM = M-+- 1 El — SEM = M — 1 
1 200 I FM=0TMEM 1 230 
12210 MEXTK 

122220 PRINT" DO WHILE WITHOUT END IM LIME" 5L(T) = GOT O <£> 0 

1 2230 J J = J s JT = K s GOSUB 1 0-40 = T = 

1 240 MT — ST RT (L(K)+1 > - I L = LEM ( MT > = MT=RIGMTT ( NT-, LL — 1 ) 

1 2250 GT = STRT ( L ( J > i- 1 > = L L — L E M ( GT ) = GT==RI GMTT ( GT y LL — 1 ) 

1 22 <£> 0 TT ( K -t- 1 > — MT-*- ” GOTO " -+-GT = L ( K-+- 1 ) =L (K> + 1 

1 22T0 M T = S T R T (L(K-»-22) > = LL = LEM (MT) = MT=RI GMTT ( MT y LL — 1 > 

12200 TT ( J+l )=GT-*-" " " IF MOT ( " -*- CT-H " ) THEM " -»- M T 

1290 L ( T 1 ) — L ( T ) -+- 1 
1 300 GOTO 690 

1310 TXT = TT < vT ) s GOSUB* 1 0-40 = B= I MST R ( TXT, "DO" ) = I FB = 0TMEN<£>9>0 

13220 LL = LEN ( TXT ) = B=I MSTR ( TXT-, "UNTIL " ) = IFB = 0TMEM1510 

1330 CT=R I GMTT ( TXT LL — B — 5 > 

13-40 M= 1 

1350 FORK = T-*- 1 TO I — 1 

1 3 <£> 0 C = I MSTR ( TT ( K ) "UNTIL" > = I FC — 0TMEM 1-410 

1 370 D== I MSTR ( TT ( K > * " DO " ) s E= I MSTR < TT ( K ) " END " ) 

1300 IFD““0AMDE — 0TMEMRRIMT" II — I — EGAI — STATEMENT IM LIME" ?L(K) = GOT <_><£> 0 



1 390 I FD < > 0TMEMM — M- 
1-400 I FM — 0TMEM 1 -430 
1-410 MEXTK 



2LSEM = M — 1 
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in lime:” ; l ( j ) = goto60 



R R I N T " D O UNTIL WITHOUT END 
J J = J : J = K = GOSUB 1 840 = %J — %J LT 

mt=strt(L(k>-4-i > = ll=lem ( mt > = mt=r i ghtt ( mt , ll— i > 

GT=STRT < I — ( «J > -*- 1 > = LL = I — EM ( GT > = (5T=R I GHT$ < GT , LL — 1 > 

TT < K-*- 1 > = NT-4- ” GOTO " -«-GT = L C K-+- 1 > =L < K > -4-1 

MT = STRT(L(K-*-2> > =LL=LEN(HT> = HT=RIGHTT(Hi*9LL— 1> 

TT( J--*-l > = GT-4- " " -4- " TEC "-4 -CTh-" > THEM " -4-HT 

I ( -4- 1 ) =L < U ) + 1 

GOTO690 

RRINT" ILLEGAL DO UNT I L STATMENT IM LINE” ;L( J) SGOTO60 
RR I NX" ILLEGAL DO WHILE STATEMENT IN LINE" ;L(J) :GOTO60 

TX^ = T^( J) = GOSUB 1 8A0 : M$-STR$ ( L ( J ) +1 > = LL — LEM < NT > = N$=RIGHT$ < NT: 



-RIGHTS < TXT, LL— C > s LL = LEM 



1 420 
1 A3® 

1 A A® 

1 AS® 

1. A80 
1 AT® 

1 AS® 

1 490 
1 5 00 
15 10 
1 520 
1 530 
L_L — 1 > 

15A0 B=INSTR(TXT, "MAT " > = I EB=0THEN 1 82® 

1550 C = I MSTR ( TXT , " = " ) = I E C=® THEN 1 3 A0 

1 560 A T = M I DT (TXT, B-4-A , C — B — A > = LL — LEM ( T X T > 

( LT > 

15T0 I ELEETT < LT , 3 > = " I MV ” THENGT= ” GOSUB 30000 “= EL=— 1 = GOTO 1 33® 

1500 I ELT = ” ZER " THENGT= " EORK 1 = 1 TOM 1 = EORK2= 1 TOM2 = " -+-AT-»- " ( K 1 » K2)=0 : NE 

XTK2 , K 1 ” s GOT O 1 T30 

1 5*90 I ELT = " I DM " THENGT= " EORK 1 = 1 TOM 1 = E O R K 2 — 1 TONS s " h-AT-4- ” ( K 1 , KS > =— ( K 1 

=K2 ) = MEXTKS * K 1 ” = GOTO 1 T3® 

1 A 00 I FLEETS < LT , 3 > < > " TRM " THEM 1 830 
1 A 1 0 BT = M I DT < LT , 5 i LL — 5 > 

1 820 GT = ” EORK 1 = 1 TOM 1 = EORK2= 1 TONS = ” -4-AT-4- " < K 1 * KS > = " -f-BT-4- " ( K2 * K 1 > s NEXT 

K2 * K 1 " s GOTO 1 T30 

1 A3® C=IMSTR < LT , " ” > s I E C = 0 THEM 1 A A0 

1 A A® BT=LEETT ( L T , C — 1 > =CT=RIGHTT(LT,LL— C> 

1 A50 GT = " EORK 1 = 1 TOM 1 = EORK2= 1 TOM3 = " -4-AT-4- " ( K 1 , KS > =0 = EORK3= 1 TONS = ” -+-AT 

" ( K 1 , KS > = ” -4-AT-+- " ( K 1 , KS > h- " -+-BT-*- " ( K 1 , K3 > -*• ” -4-CT-4- " ( K3 , KS > = MEXTK3 , KS * K 1 " = 
GOTO 1 T30 

1 AA0 C=INSTR(LT, ••-»-" > s I EC = 0THEM 1 A90 

1 AT® B$ = LEET$ ( LT , C— 1 > = CT= R I GMTT ( LT , LL— C > 

1 AO0 GT = " EORK 1 = 1 TOM 1 = EORKS= 1 TOMS s " -4- AT~i- " < K 1 * KS > = " +B*+ " ( K 1 , KS > " -4-CT 

" < K 1 9 KS > = MEXTKS , K 1 '* = GOTO 1 T3® 

1690 C=INSTR(LT, " — " > = I E C = 0THEM 1 TS0 

1 T00 BT=R I GMTT < LT 9 LL— C > 

1 T 1 0 GT = " EORK 1 = 1 TOM 1 = EORK2= 1 TOMS = " AT-4- ” < K 1 9 KS > =— " -t-BT-4- " ( K 1 , KS > = ME X 

TKS 9 K 1 " = GOTO 1 T 30 

1 T 20 GT = ” EORK 1 = 1 TON 1 = EORKS= 1 TOMS = " -4-AT-4- ” < K 1 9 KS > = " +L$+ " < K 1 9 KS > = NEXT 

KS 9 K 1 " 

1 T30 L < LT-h 1 > =1 — < LT > -+- 1 = TT < J-4- 1 ) =N^+G^ = GOTOAT0 

1 T A® C=INSTR(TXT, " IMRUT " > = I E C= 0THEM 1 TS® 

1T5® LL=LEN(TXT> 

1TA0 AT=R I GHTT < TXT 9 LL — C — 5 > 

1 TT0 GT = " EORK 1 = 1 TOM 1 = EORKS= 1 TOMS = I M RUT " -4- AT-»- " ( K 1 , KS > = MEXTKS * K 1 “ = GO 

TO 1 T30 

1 T 80 C=INSTR(TXT, "RRINT " > = I E C = 0 THE M 1 8S® 

1 330 LL=LEN(TXT> 

1800 AT=R I GHTT ( TXT , LL— C— 5 > 

18 10 GT = " EORK 1 = 1 TOM 1=9= EO RKS= 1 TONS = RR I MT ” -4- AT-»- " < K 1 9 KS > 5 = MEXTKS , K 1 " 

= GOTO 1 T30 

18S0 RRINT" ILLEGAL MATRIX STATEMENT IM LIME" ;L( J) 

1830 GOT O A 0 

1 8A0 LL = LEN ( TT ( ,J > > = TT < LT ) =LEET^ < T* ( J > , A < J ) REM " + RI GHT^ < Ti* < LT > 9 LL — 

A < LT > ) = RETURN 

185® TX* — T$ ( J ) = GOSUB 1 8 A0 b B= I MST R < T X i* 9 " SUBST R " ) = IFB = 0THEN1 9A0 

1 8A0 C= I MST R < T X i* 9 "9 " > = I EC = 0THEM 1 <9 A0 

1 830 LL = LEM < TX^ > = A^ = M I D^ <TXH »9 A < »J > - 1-8 9 C — A < vJ > —8 > 

1880 Bi*=R I GHT^ < TXi* 9 LL— C > 

1 8 30 Ni* = STRi* < I — < J > -*- 1 > = LS = LEM <Ni*> = M^ = RI GHT^ < M -* , LS— 1 > 

1 300 Gi*= " A A^= " +A$+ " s BB^= ” " = K 1 = I MST R < A A 1 * , BBi* > = KK < 0 > =SGN C K 1 > = I E 

K 1 < >®THEMGOSUBS30®0 " 

1310 Tt* < J-*-l )=M$ + G$:L(J+1 > =L < vT > -+- 1 = EE = — 1 = GOTO A 30 
13S0 I EEE=— 1 THENRETURM 

1 330 EE = — 1 = RESTORE = E O R S = I -f- 1 1 TO I -+-S3STERS = READT^ < S > = NEXT =1 = 1 -»-3 1 = RETU 
RM 

1 3A0 
1 350 
1 3A0 
1 330 
1 380 
1 330 
S 000 
20 1 0 
20 S 0 



RRINT” ILLEGAL SUBSTR STATEMENT IM L I ME " ? L < J > = GOTOA0 
DATA " S3000 KK < 1 > =K 1 = L 1 i* = AAi* = LL = LEN < A A 1 * > s 11 = 1" 

DATA " S30 10 LI =LEN < BB*> > " 

DATA ” S30S0 R 1 =K 1 -*-L 1 " 

DATA " S3030 Lli*=RIGHTi*<Lli*9 LL — R 1 1 ) " 

DATA " S30A0 K 1 = I MST R < L 1 1 * 9 BB$ > " 

DATA" S3050 I EK 1 =0T HEM RETURN " 

DATA " S30A0 11 = 11-4-1” 

DATA " S3® 3 0 KK < I I > =K 1 -#~LEN < BB^ > = KK < 0 > = K K <0>h-1 = I E I I > 1 THEMKK < I I > = 
KK < I I > -+-KK < II — 1 > — 1 " 

S030 DATA" S3080 LL = LEN < L 1 i* > " 

S0A0 DATA” S3030 GOTOS30S0 " 

2050 I ELE=— 1 THENRETURM 

S0A0 L E = — 1 = RESTORE = EORS= 1 TO 10= README = NEXT = EORS= 1-4-11 TO I -+-53STE RS = REA 
DTi* C S > = NEXT =1 = 1 -4-5 5 = RETURN 

S030 DATA "30000 EORK 1 = 1 TOMM = EORKS= 1 TOMM = A < K 1 9 KS > =— . < K 1 =KS > = ME X TKS 9 K 
1 " 

S080 DATA "300 10 EORK I = 1 TOMM— 1 " 

2030 DATA" 30020 K C= 1 " 

S100 DATA” 30030 I E B < K I 9 KI > O0THEN30030" 

SI 10 DATA" 300 A 0 I EK I -+-KOMMTHEMRR IMTCHR^<38> 5 CHRi* < 33 > ? CHR^ < 32 ) ; ChR* 

< 33 > ?<=Hr-i*<38> 5 ChR$ < 88 > ? «= H r- < 83 > ?Ch Ri*<82> ?c:Hr-*<83> ; ChR$(69) = STOR " 

S 1 20 DATA "30050 11 = 1 = I2 = KI-*-KC = KG = KC-»-l = GO SOB 30210" 

SI 30 DATA ”30080 GOTO30030 " 

2140 DATA "30030 I 1 =K I = X K= 1 / B < K I 9 K I > = GOSUB30 1 30 " 

SI 50 DATA "3008® EO RKJ = K I 1 TOMM " 

SI 80 DATA "30030 X K = — B < K vJ 9 K I > = I S = K2T = GOSUB30S0® " 

S 1 30 DATA" 30100 ME X TK«J 9 K I " 

2 180 DATA " 30 110 I EB < MM 9 NN > =0THEM R R I NTCHR^ < 38 > ? CH Ri* < 33 > ? CHR^ < 32 > ; CH 

R^ C 33 > - CHRi* (78 > 5 CH R^ < 88 > ? CHR^ < 83 > ? CHR<* < 82 > ; CHRi* < 83 ) 5CHRi*<83> = STOR " 

SI 3® DATA" 30 1 20 X K= 1 / B < MM 9 MM > = I 1 =MM = GOSUB30 1 30 " 

SS00 DATA" 30130 EO RK I =MMTOSSTE R— 1 " 

SS 1 0 DATA" 30 1 A 0 I 1 = K I " 

SSS0 DATA "30 150 FORK J=K I - 1 TO 1 STEP- 1 " 

SS30 DATA "3® 180 XK = — B(KJ» KI > = I2 = KJ = GOSUB 30200" 

SSA0 DATA "30 130 ME XTKJ , K I " 

SS50 DATA" 30180 RETURN" 

SS80 DATA " 30 1 30 EORKK= 1 TOMM = A < I 1 9 KK > =XK-*«- A <11, KK > = B < I 1 9 KK > = X K B (II, 
KK > = NEXT = RETURN " 

SS3 0 DATA " 30S00 EORKK= 1 TOMM = A < I S 9 KK > = A < I S 9 KK > X K ^ A <11, KK > = B < IS, KK > 

= B (IS, KK > X K -*«- B (II, KK > = NEXT = RETURN " 

SS80 DATA ” 30S 1 0 EO RKK= 1 TOMM = CC = A (II, KK > = A ( I 1 9 KK > =A ( I S 9 KK > = A ( IS, KK > 

= CC = CC = B ( I 1 9 KK > = B ( I 1 , KK > =B (IS, KK > = B ( IS, KK ) =CC = NEXT = RETURN " 

SS30 TXi* = Ti*(T> = GOSUB 18A0 

2300 C= I NSTR ( TXi* , "DOT " > = I E C = 0THEMS330 

23 10 D= I NSTR ( T X 1* , " = " ) = I ED = 0THEMS330 

S3 20 Ai* = MIDi*(TXi*9C-4-A9D— C — A> =C=INSTR(TXi*9 " < " > = IEC = 0THEMS330 

2330 D= I MSTR ( 3 X 1 * 9 " , " > = I ED = 0THEMS330 

S3A0 Bi* = MI Di* (TX^, C-4-1 , D— C— 1 > = E= T MSTR (TXi*, »>» > s I EE = 0THEMS33® 

S35 0 C^ = M I D*> ( TXi* , D-4- 1 , E — D— 1 > 

2380 L ( T .1 > =L ( vJ > -+- 1 = Mi* = STR^ ( L ( T-+1 > > = LL = LEM(M^> = M^ = RI GHT 1 * ( NT , LL— 1 > 
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2370 G^= " *• -+- — 0 s FORKK= 1 TON 1 = " ” -+- " -fr-Bi*-*- " <KK» 1 > -* " 

“ <KK9 1 ) = NEXTKK " 

2300 Tt < J--+- 1 > ==M^-f-<5^ = G C> TO690 

2390 PR I NT " ILLEGAL DOT PRODUCT STATEMENT IN LINE" 5 L < %T > = GOTO<£>0 

2A00 TX$=T$ ( J ) s GOSLJB 1 0-<40 

2^10 C= I NSTR < TX*i , " OE C ” > = I E C = 0TMEN2AO0 

2^20 D=INSTR<TX^r» " = " > = I ED = 0THEN2AO0 

2 A 30 A^-=MID^ < TX$, C-«-A 9 D — C — A > = C = I NSTR < T X ^ ” -*■ " > = I E C = 0T HEN 2 A O0 

2AA0 E.^==MID^<TX^-»D-»-l‘» C — D— 1 > = LL=LEN <TX^> = C^=R I GHT^- ( T X s* 9 L L — C > 

2A5 0 L < T-4- 1 )=L( J>+1 = N^ = STR^ (L( J+l > > = LL — LEN < N^ ) s N^t> — R I GHTT < N^ 9 LL— 1 > 

2AA0 G*5= " " < 1 » 1 > — " " < 2 9 1 > h " < 3 » 1 > — " " C 3 , 1 > ++ " -+- G -+- " < 2 

9 1 > = " " <29 1 > = ” " < 3 » 1 > -x- " -H •• < 1 , 1 > — ” " < 1 9 1 > •*• " -*-CH»-+- " <3<*1>s”-*~ 

" <3^ 1 > = ** ” C 1 9 1 > •*- " " <29 1 > — ” -*-B*s-+- " < 2 9 1 > " -*-C^-+- " < 1 9 1 > " 

2AT0 T& < J-»- 1 > =N*iH-G*i = GOTO£>90 

2AO0 ERINT" ILLEGAL VECTOR PRODUCT STATEMENT IN L I NE " 5 L < > a GOTO60 



2-490 TX^ = T^< J> = GOSO& 10-40 

2500 C=INSTR<TX^9 " DET < ” > = I E C = 0THEN2600 
25 10 D=INSTR<TX^9 ■’>’■>= I FD=0THEN2600 
2520 B^==M I D^ < TX^ 9 C-*-A 9 D — C~A > 

2530 C=INSTR<TX^9 " " > = I E C = 0TMEN2<£>00 

25-40 D=INSTR<TX^9 " = " ) = I ED = 0THEN2<£>00 

2550 A^==M I D^ < TX^ 9 C-4- 1 9 D— C— 1 > 

25 <£»0 ED = — 1 

25-70 G^=" EORK 1 = 1 TONN = EORK2= 1 TONN s DT < K 1 9 K2 > ■ 

1 = GOSOB3 1 000 s " -»-A^h- " =DT 1 



)80 
2500 
2600 
2 < 6 > 1 0 
2 < 6>20 
2<£>30 
2640 
2<£»5 0 
2 6? 63 0 
2670 
2 < 6 >O 0 
2<6>90 
2-700 
2 T 1 0 
27 20 
2730 
2TA0 
295 0 
2760 
2990 
2780 
2790 
2S00 
20 1 0 
2020 
2030 
20-40 
2050 
2860 
2870 



> s LL = LEN < N^ > = N^=R I GMTt* < N^ 



- O ^ -t- " < K 1 9 K2 > = NEXTK2 9 K 
LL— 1 > 



L I NE " * L < vT > s GOT 060 



= 1+55 = RETURN 



DATA 1 
DATA ’ 
DATA ‘ 



L< J-t-1 ) =L < JT > -♦- l = N^ = STR$ < L < vT -+- 1 > 

T^ < vJ-+- 1 > = N^-+-G^ = GOT 0690 

RRINT" ILLEGAL DET STATEMENT IN 
IE DE THEN RETURN 

DE — — 1 = RESTORE = FORK= 1 T032 = README = NEXT 
EO RS= I - 1 - 1 1 TO I -+-5 3STEP2 = RE ADT*> < S > s NEXTS = I 
DATA" 31000 X M= 1 ” 

EO R KI==1 TO NN— 1" 

IE DT < K I 9 K I > < >0 THEN 3 1110” 

EOR K J=K I + 1 TO NN " 

IE DT(KJ»KI><>0 THEN 3 1 030 " 

NEXT KJ " 

DT==0 = GOTO 3 1210" 

X M = — X M “ 

EOR KK=1 TO NN" 

CS — DT < K I 9 KK ) s DT < K I 9 KK > — DT < KJ 9 KK > = DT < K J 9 KK > 
NEXT KK" 

CS — DT < K I 9 K I > = X M — X M ++ C S " 

EOR KK— 1 TONN s DT < K I 9 KK > =DT < K I 9 KK > / CS s NEXT 

EOR K R = K I 1 TO NN " 

CS — D T < KR 9 K I ) " 

EOR KK= i TO NN" 

DT < KR 9 KK > — DT < KR 9 KK > — CS^DT < K I 9 KK > " 

NEXT KK 9 K R " 

NEXT K I " 

D T — 1 = EORK 1 = 1 TONN = DT = DT+«-DT < K I 9 K I > = NEXTK I " 
DT=XM-J^DT " 

RETURN " 

GOSUO 1 840 



DATA 

DATA 

DATA 

DATA 

DATA 



3 10 10 
3 1 020 
3 1 030 
3 1 040 
3 1 050 
3 1 0<S0 
3 1 070 
3 1 0O0 
3 1 090 



DATA "311 00 
DATA "31110 
DATA "311 20 
DATA "311 30 
DATA "311 -40 
DATA "31 150 
DATA "311 6>0 
DATA "311 "70 
DATA "311 O0 
DATA "311 90 
DATA "31 200 
DATA "31210 
TX^ = T«. < JT > 



C= I NSTR < T X ^ , 



> = I EC = 0TMEN30-70 



continued 



— RACET computes — RACET SORTS — RACET UTILITIES — RACET computes — RACET 

DSM $75.00 Mod l y $150.00 Mod II 



F RACET COMPUTES 

702 Palmdale. Orange CA 92665 — RACET computes — RACET SORTS — RACET UTILITIES 

i FROM THE LEADER IN UTILITY SOFTWARE 
FORTHETRS* COMPUTERS 

= ★ ★ NEW ★ ★ HARD/SOFT DISK SYSTEM (MOD II) $400 
^ The Hard Disk Software Implementation You Have Been Waiting 
) For!! MOD II TRSDOS compatible — using Cameo controller 
: interface to popular large hard disk fixed/removable combinations 
I (Ampex, CDC, Diablo, Pertec, Wanco, etc.). Compatible with your 
j existing programs — change only ‘filename’. All disk BASIC state- 
j ments identical. Improved dynamic file allocation. A single file can 
j be as large as one disk — 20 megabytes or larger. Alternate mode 
- allows 24-million byte record range. Directory expandable to handle 
j thousands of files! Includes special XCOPY, DCS, and SZAP 
: utilities for use with hard or soft disks. Parameterized FORMAT 
I utility includes options for specifying the number of sectors/track, 

? platters/drive, sectors/granule, sectors/directory, etc. 

; ★★ NEW ** BASIC LINK FACILITY ‘BLINK’ $25 Mod I 
: (Mod I Min 32K 1-disk) $50 Mod II 

: Link from one BASIC program to another saving all variables! The 
: new program can be smaller or larger than the original program in 
, memory. The chained program may either replace the original 
; program, or can be merged by statement number. The statement 
•• number where the chained program execution is to begin may be 
I specified! 

; INFINITE BASIC (Mod I Tape or Disk) $49.95 

j Extends Level II BASIC with complete MATRIX functions and 50 
more string functions. Includes RACET machine language sorts! 

| Sort 1000 elements In 9 seconds!! Select only functions you want 
j to optimize memory usage. 

: INFINITE BUSINESS (Requires Infinite BASIC) $29.95 

Complete printer pagination controls — auto headers, footers, 

! page numbers. Packed decimal arithmetic — 127 digit accuracy 
Binary search of sorted and unsorted arrays. Hash codes. 

BASIC CROSS REFERENCE UTILITY (Mod II 64K) $50.00 

SEEK and FIND functions for Variables, Line Numbers, Strings, 
Keywords. ‘All’ options available for line numbers and variables. 
Load from BASIC — Call with ‘CTRL’R. Output to screen or printer! 

Circle reader request for free 24-page catalog. 



(Mod I Min 32K 2-drive system. Mod II 64K 1-drive) 

Disk Sort/Merge for RANDOM files. All machine language stand- 
alone package for sorting speed. Establish sort specification in 
simple BASIC command File. Execute from DOS. Only operator 
action to sort is to change diskettes when requested! Handles 
multiple diskette files! Super fast sort times — improved disk I/O 
times make this the fastest Disk Sort/Merge available on Mod I or 
Mod II. 

UTILITY PACKAGE (Mod II 64K) $150.00 

Important enhancements to the Mod II. The file recovery capabilities 
alone will pay for the package in even one application! Fully 
documented in 124 page manual! XHIT, XGAT, XCOPY and 
superzap are used to reconstruct or recover data from bad 
diskettes! XCOPY provides multi-file copies, ‘wild-card’ mask 
select, absolute sector mode and other features. SUPERZAP 
allows examine/change any sector on diskette include track-0, and 
absolute disk backup/copy with I/O recovery. DCS builds con- 
solidated directories from multiple diskettes into a single display 
or listing sorted by disk name or file name plus more. Change 
Disk ID with DISKID. XCREATE preallocates files and sets ‘LOF’ 
to end to speed disk accesses. DEBUGII adds single step, trace, 
subroutine calling, program looping, dynamic disassembly and more!! 

DEVELOPMENT PACKAGE (Mod II 64K) $125.00 

Includes RACET machine language SUPERZAP, Apparat Dis- 
assembler, and Model II Interface to the Microsoft ‘Editor 
Assembler Plus’ software package including uploading services 
and patches for Disk I/O. Purchase price includes complete copy 
of Editor Assembler + and documentation for Mod I. Assemble 
directly Into memory, MACRO facility, save all or portions of 
source to disk, dynamic debug facility (ZBUG), extended editor 
commands. 

COMPROC (Mod I — Disk only) $19.95 

Command Processor. Auto your disk to perform any sequence of 
instructions that you can give from the keyboard. DIR FREE 
pause, wait for user input, BASIC, NO OF FILES and MEM SIZE,’ 
RUN program, respond to input statements, BREAK, return to 
DOS, etc. Includes lowercase driver, debounce, screenprint! 

CHECK, VISA. M/C, C O D , PURCHASE ORDER ‘TRS-80 is a registered trademark of 

Telephone Orders Accepted (714) 637-5016 . Tandy Corporation 



DEALER INQUIRIES INVITED 
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2880 
2:e<70 
2:<?00 
2: <7 1 0 

2: <7 2*0 
2! <730 
2:<7 A0 
295 0 
2r c ?<^0 
2970 



B=INSTR(TX$, ** M > s I FB = 0THEN3070 

P* = MXD^(TX$, B+l » C — E3 — 1 > = PR=PR-i- 1 = PRS( R R ) — R Sfc 

N$-STR$ < L_ < J > > = L_ I — 1 E N <M^> = M ^ — R X GHT^ < N*J , Ll_ — 1 

PA?* C RR ) ==NH* 

C = I NST R(TX?r-, ••<••>= IFC=0THEN2960 
PL < RR > =PL C RR > -»- 1 



C = X NSTR < Ch- l»TX*i " * " 

PL < RR > == Rl < RR > -+- 1 

FORK=J+ 1 TON 
I R X NSTR < Ts* < K > * " RROC 
LLOWED" = GOTO^B 
2>«?O0 C — I NSTR < TT C K > 



> s IFCO0THEN2930 



> < > 0THENP R I NT " NEST I N<3 OR PROCEDURES NOT 



END " > s I R C — 0THEN30 1 0 



IN l_ I NR '■ ; L. ( J ) = GOTO<S0 



X N I I NR “ ; L. ( J > = <3OTO<G0 



HENP-LL 



; L ( J ) s GOTO60 



2:<7<70 I R I NSTR < C^3 , T*J < K > ■» RR^ < RR > > — 0THEN30 1 0 
3000 GOT 03030 
3010 NEXTK 

302:0 R R I N T *■ PROCEDURE Ul I THOUT END 
3030 S J = J : J = K : GOSUB 1 840 = T^ST 

30 A 0 L < K-*- 1 > —I ( K ) + 1 = Ni* = STR^ (L(K+1 > > = L L — L EN < N^> > = N^> = R I GHT* < N^ , L„L— 1 > 

3050 T <t» C K -+1 > = N T " RETURN " 

30 <£> 0 <5OTO<S<7 0 

3070 RR I NT' ” T I LEGAL RROC STATEMENT 

3000 J=0 

3090 J=J+1 

3100 I E J >NTMEN RETURN 
3 110 I ETT» <. kJ > — " " THEN3090 

3 120 C=INSTR < T$ ( J ) , "CALL " > = X R C=0THEN3090 
3 1 30 L_L = LEN < T$ < J> > -*- 1 = R= I NSTR < <*!>," < " > = I R R — 0TI 

31A0 P$ = MID^ <T$< J) ? C + 5» R-C-5) 

3150 EORK=lTORR 

3160 IFPR$(K)=P^ THEN 3 1 <70 
3170 NEXTK 

23100 R R I NT ** NON EXISTENT PROCEDURE C A L LEO IN LINE 

3 1 <70 N -L — E A -£ti < K > = M 1 =PL < K > = I RM 1 > 0THENM 1 = M 1 — 1 

3200 TX^=T^ < J > :GOSUB1840 

32 10 I — < 2T -*- 1 > =1 < J > 1 = MT» — ST R^> < I — < vX -* 1 > > 

3220 I RM 1 =0TMENT^ < 2T-4- 1 > =M^-+- •• GOSUB 

3230 J1=0 

3240 2T2: = 0 

325 0 2T2: = J2+ 1 = I R I NSTR < T^ < J2 > , " RROC" 

3260 J1=J1-M : IRJ1CKTHEN3250 

3270 KK-J2 = CO= I NSTR < T^ < KK ) » " < " > = CC = INSTRCTX^H* “ < " > 

3280 I R CO = 0 OR CC = 0 THEN PRINT" PROGRAM ERROR" = STOP 

3290 RORJ2=lTOMl 
3300 I FJ2<M 1 THEN3320 

33 10 C 1 — I NSTR < CO-*- 1 * T^ < KK > * " > " > = C2— I NSTR < CC-i- 1 TX$ •. " > 

3320 C 1 = I NSTR < CO-+- 1 * TUb < KK ) * " •» " > s C2= I NSTR < CC-*- 1 * T X T> , " , 

3330 UM> < J2 > — M I C T^> < KK > , CO-*- 1 ■> C 1 —CO— 1 > 

33^+0 V4> < J2 > = M I OT> ( TX^t, C C* 1 -> C2-CC- 1 > 

23350 CO=C 1 r CC=C2 
3360 NEXTJ2 
3370 X T = M^-+" 

3300 RO R J2— 1 TOM 1 

3390 X T — X < J2 >-*-" = " -f- < J2 > “ = " 

3A00 NEXT J2 

3410 T ^ < J" 1 ) = Xf +"GOSUB " -*-NT> 

3 -4 2: 0 GOT 03090 



: LL = LEN < M^> ) = M^=R1 GHT , LL— 1 > 
1 h-NH> = GO TO3 0<7 0 



-0THEN3250 



> = <5 O T 03330 

> 
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LYINTX. 

makes your T 
a whole new 
animal. 



LYNX isn’t just a telephone coupler. 

LYNX is a one-piece total telephone linkage 
system for TRS-80 Level I and II computers. It 
contains all the functions you need to tap The 
Source. Engage your business computer. Play 
games with a computer friend. Or do nearly 
anything you wish. 

Best of all . . . LYNX costs only $239.95*. A mere 
fraction of what you used to have to pay for 
equipment to do the same job. 

LYNX. To get your paws on one, call or write: 



EMTROL 
SYSTEMS, INC. 



123 LOCUST STREET LANCASTER, PENNSYLVANIA 17602 
Phone 717/291-1116 

VISA or Master Card Welcome 

\mmm\ *Add $2 50 for shipping and handling 
VISA' Presidents add 6° o sales tax 

!^HWIPd; Includes ‘Terminal program on cassette, instruction manual 



I VMY telephone 
LT IN r*\J LINKAGE SYSTEM 



TRS-80 is a trademark ol the Radio Shack Division ot Tandy Corporation " 
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COMPUTER CHESS - 

HARRY SHERSHOW — Dept. Editor 

The Nerve of a Chess Player! 



A Book Review 
BY HARRY SHERSHOW 



Chess players have always been con- 
sidered a curious lot, afflicted with 
more neurotic symptoms than any other 
single class of gamesmen. Their hands 
tremble, their muscles stiffen, they as- 
sume immoveable poses for hours at a 
time (like hunter’s dogs), and they 
adopt strict regulations for themselves; 
such as, no noise! no talking! no smok- 
ing! no touching of pieces! no heavy 
breathing! Admittance into the inner 
sanctuary of a chess club is like wan- 
dering into a chapel. All the members 
sit quietly, staring somberly at each 
other. No one smiles and no one 
moves. They are a strange lot. They 
rarely applaud the victor of a game. 
Usually they commiserate with the de- 
jected loser and gleefully show him 
where he went wrong. To the van- 
quished this is a second whipping, but 
such are the ways of these chess people. 
One has always wondered when some 
psychiatrist was going to come along, 
analyze this cult and then offer some 
explanation for “chess club syn- 
drome. ” Someone now has done that. 

Kenneth Colby is Professor of Psy- 
chiatry, Behavioural Sciences and 
Computer Sciences at UCLA. He is 
also a Class A chess player. Therefore, 
he should know more about the pecca- 
dilloes of chess players than your aver- 
age pedestrian observer. His new book, 
“Secrets of a Grandpatzer” (with a 
subtide of “How To Beat Most People 
and Computers at Chess”) must rank 
among the best chess books ever writ- 
ten. He offers advice on how to beat 
your opponent (man or machine) by 
carefully dissecting the mechanics of 
the game down to their logical ele- 
ments. The book is a masterful exposi- 
tion of such ploys as “How to Study,” 
“How to Play,” “How to Miscellan- 
eous,” plus usual instructions on plan- 
ning strategy and counterattack. But it 
is between the game lines, though, 
where the book shines brightly. 

“Speaking of being nervous and be- 
ing drunk,” writes Dr. Colby for 



example, “I have found it useful to be 
slightly swacked at the start of a game. 
Holov, a Soviet grandmaster, was once 
suspended from tournaments for a year 
for drinking too much. He went a bit 
too far with it, but he sure could make 
some great moves. In this 
position: . . .” (see the book.) 

At another place, the author says, 
“John Dewey said the deepest human 
urge is to feel important. Nobody wants 
to be a nobody. It is precarious to use 
chess as a way to defeat a sense of 
nobodiness. (If a Martian came here, he 
would be astounded to hear of the 
powers of our Nobody: Nobody is per- 
fect; Nobody can give birth to himself; 
Nobody can be in two places at once.)” 

Other Colby observations: 

“Shame and humiliation originate in 
childhood from being ridiculed and 
treated with contempt by others. Of all 
the various types of game-players and 
athletes I have known, chess-players 
suffer most from emotions of contempt. 

“Most masters I know have absolute 
contempt for chess-playing computers, 
but of course there is a growing threat to 
them here.” 

“I remember vividly a tournament 
opponent of mine who was a 75-year- 
old trembly-handed janitor for a gram- 
mar school in a back-country California 
town. He opened the game atrociously, 
moving the same Knight four times. I 
couldn’t believe he would ever want to 
enter a tournament. He won the game!” 

“Nimzovich once protested al- 
lowing a ‘stupid idiot’ of a player to 
enter a tournament and then lost to 
him!” 

“All sorts of pressures besiege the 
player over the board. A general inven- 
tory of them is of little use. Each 
Grandpatzer must find, know, and at- 
tempt to control his own. One man’s 
meat is another man’s poison. I know 
players who become so extremely tense 
and excited when they have a winning 
position that it is unbearable to watch 
them because they are so vulnerable to 
making a quick blunder in this state. 
Other players look so cool and non- 
chalant that only careful study of the 
board reveals they are absolutely lost. ” 



“Alekhine felt chess was a matter of 
vanity. Capablanca in 1913, had the 
Mayor of Havana clear the playing 
room so no one would see him resign to 
Marshall. If you size up your opponent 
as ‘dumb’, you (‘the great me’) are in 
great danger from your most dangerous 
opponent, yourself. ‘Vanity rather than 
wisdom determines how the world is 
run,’ said Vonnegut.” 

“Life is more than just ham sand- 
wiches and beer. Humans strive to not 
to survive, but to enhance the quality , 
the excellence, of survival. Happy 
people, without artistic goals, vegetate 
in incomplete, hobbled and impover- 
ished lives.” 

“Players of the future may begin to 
use chess programs during adjourn- 
ments which should bring an end to our 
long-standing absurdity of having sev- 
eral consultants help out a player with 
adjourned games . . .After all. Queens 
and clocks were introduced to speed up 
the game (over resistant opposition) but 
we take them as sensible now.” 

There are 140 pages sparkling with 
more of the preceding observations and 
you surely will spend an enjoyable 
evening looking for them. “Secrets of a 
Grandpatzer” is a chess book that one 
will read rather than study. More than 
100 chess diagrams are included, to- 
gether with corresponding game docu- 
mentation, to soothe the appetites of the 
hungriest players. If you absorb all the 
advice that Dr. Colby offers, you could 
become a formidable opponent for both 
people and computers. To strengthen 
your level of play, the doctor claims, 
you must understand not only many 
secrets of the outer game of chess but 
also those of the inner ego game of 
chess players. For such professional 
advice alone the book is a bargain re- 
gardless of its price. After all, if you 
were lying on the couch in Dr. Colby’s 
office, listening to him read aloud, you 
would be paying him $25 or $50 an 
hour. Indeed, this is a bargain. 

To order this sparkling chess book 
for yourself or as a gift for one of your 
grumpy chess-playing friends (to im- 
prove his disposition) refer to the ad in 
the classifieds of this section. 
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Rating BORIS 2.5 



BY DAVE WELSH 



David E. Welsh , who wrote this analy- 
sis , is a consulting mechanical engineer 
specializing in product design and de- 
velopment. The modular game system 
unit formerly marketed under the name 
of Sargon 2.5, by Chafitz Co., is cur- 
rently being marketed as BORIS 2.5 by 
Applied Concepts. No adamant state- 
ment on this change has as yet been 
issued by either company as apparently 
they are involved in some litigation. 

Best of the “standalone” computer 
chess games at this date is Boris 2.5 
(formerly known as SARGON 2.5). 
The program is in a small ROM mod- 
ule, which plugs into a housing con- 
taining microprocessor, keyboard and 
display. Later versions, or other games 
(a strong checkers module is reportedly 
ready) will be available at modest cost. 

The System 

Boris 2.5 runs on a 6502 micro- 
processor with 8K of ROM and only 2K 
of RAM. Its clock speed of 2 MHz lets 
the “stand alone” run twice as fast as 
an Apple II Sargon II cassette, and 
three times as fast as the TRS-80 cas- 
sette. The system features a flourescent 
display and audio feedback for key- 
board entry, illegal moves, announcing 
the machines move, and checkmate or 
stalemate. Contrary to rumor, the cur- 
rent microprocessor is not the same one 
that was used in earlier Boris models. 

The original Sargon program was 
developed by Dan and Kathe Sprack- 
len. Work began in September 1977, 
when Dan started writing symbolic 
pseudocode (they didn’t have a com- 
puter yet). In November, Kathe joined 
the effort, and in December they took 
delivery on a Jupiter III microcomput- 
er, and began translating the program 
into Z-80 assembly language and de- 
signing interface graphics. Like most 
programs, Sargon needed lots of “de- 
bugging” and by the end of January 
1978, it would make legal moves but 
little more. Programmers will realize 



the effort needed to finish the program 
in just one month, in time to play in the 
first microcomputer chess tournament 
on March 3, 4 and 5 at the West Coast 
Computer Faire. Sargon easily won the 
tournament with a 5-0 score. A listing 
of the program at this stage was pub- 
lished as “Sargon — A Computer 
Chess Program” by Dan and Kathe 
Spracklen, Hayden Book Co., 1978. 

The Spracklens did not rest on their 
laurels, but continued to improve their 
program during 1978, concentrating on 
move selection logic and algorithm 
efficiency. In December, 1978 the im- 
proved Sargon II was invited to the 
ninth annual North American Comput- 
er Chess Championship tournament, 
where it made computer and chess his- 
tory by tying for third place — defeat- 
ing the powerful mainframe program 
A WIT in the final round. By then, Sar- 
gon II was generally recognized as the 
microcomputer world Chess champ- 
ion. In February 1979, Chess Challen- 
ger 10 won the Penrod Memorial 
Microchess tournament to qualify as its 
“challenger”. In the championship 
match Sargon II beat Chess Challenger 
10 quite handily. 

The tenth North American Computer 
Chess Championship in October 1979 
saw Sargon 3.0 finish in seventh place, 
losing to the second and fourth place 
mainframes, and drawing with main- 
frame BLITZ 6.9. Sargon easily won 
its game with microcomputer 
MYCHESS (running on a 64K Cro- 
memco Z-2D), and put up a terrific 
battle against 1978 champion BELLE 
— declining a draw offer at the 38th 
move and eventually losing. Sargon 
3.0 then traveled to London for the 
second annual European Microcom- 
puter Chess Championships in Novem- 
ber 1979, scoring an easy 5-0 victory. 
In an exhibition game after the tourna- 
ment, Sargon trounced Voice Chess 
Challenger in a blitz game at Queen 
odds! 

Sargon 2.5, developed for the 
Modular Game System, made its debut 
in the seventh annual Paul Masson 
American Class Championships, June 



30-July4, 1979. Competing in Class C, 
it scored 3%-l Vz for a 1641 USCF 
event rating. In the San Jose City Col- 
lege Open in January 1980, Sargon 
increased its USCF rating to 1736. 

The Program 

Boris 2.5 (or Sargon 2.5, depending 
on what model you have) has seven 
levels of play: 0 (instantaneous re- 
sponse), 1 (10 seconds), 2 (20 sec- 
onds), 3 (60 seconds), 4 (3 minutes), 5 
(30 minutes), and 6 (3 hours). Level 0 
only examines the opponent’s possible 
replies; the number of the other levels 
indicates the minimum number of look- 
ahead plies in the programs full-width 
search. As the game progresses, there 
are fewer pieces to consider, and the 
search depth increases. The program 
selectively examines certain moves be- 
yond the full- width search, to as much 
as 9 or 10 plies. 

Sargon’s search algorithm is very 
efficient. In my review of Chess Chal- 
lenger 7 (Personal Computing, Jan. 
-Feb. 1980), a “mate in two” problem 
was used to measure CC 7’s search rate 
at 30 positions/second. Sargon solved 
it at a 90 positions/second clip, and 
demonstrated the efficiency of selec- 
tive search in game situations by find- 
ing the 4 move combination from 
Welsh-Dunning, 1968 in only 32 min- 
utes — a 150:1 improvement over CC 7! 

Sargon’s program incorporates long- 
range planning and sophisticated posi- 
tional evaluation parameters. Although 
it can be outplayed by a strong human, 
Sargon rarely makes serious positional 
miscalculations, and never commits the 
gross blunders that mar the play of 
other chess microcomputers. It is the 
only microcomputer that can formulate 
a strategic plan. 

USCF Rates Sargon 2.5 above 
85% of Tournament Players 

Sargon 2.5’s provisional USCF rat- 
ing of 1736 is compared to the ratings 
of USCF members in Diagram 1. The 
area under the curve represents the 
number of rated players, and the per- 
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centile ranking for a given rating r is 
found by. 



P(r) = 



S N(r)dr 
r min 

r max 

J N(r)dr 
r min 



Carrying out the integration graph- 
ically ranks Sargon in the 86th percen- 
tile. Chess Challenger 7 would rank in 
about the 35th percentile. From the 
USCF rating formula approximate odds 
can be derived, which illustrate the 
significance of a rating difference: 



Difference Odds 

in Ratings favoring Stronger 



100 5:3 

200 3:1 

300 7:1 

400 15:1 



Sargon’s Style of Play 

Sargon likes classical positions with 
strategy revolving around control of the 
center. Its opening “book” is only 3 
moves deep (compared to 4 for CC 7). 
The Auto-Response board version has a 
much larger opening “book” because no 
display messages are stored in ROM. 

Sargon conducts the Black side of 
the Sicilian Defense particularly well, 
playing an early . . .e5 and obtaining 
positions characteristic of Lowenthal 
and Boleslavsky variations. Open 



games such as the Ruy Lopez, Giuoco 
Piano, Scotch Game and Two Knights’ 
Defense suit Sargon’s style better than 
slow closed openings like the King’s 
Indian Attack. Against the King’s 
Indian Defense of the Pirc-Robatsch, 
Sargon plays well, building up a clas- 
sical “big center”. 

In the middle game, Sargon plays 
aggressively when it senses a weak- 
ness, and is dangerous on the attack in 
an open position. In slow maneuvering 
games, Sargon misses chances for posi- 
tional attacks but does not spoil its own 
position — it marks time, waiting for 
the opponent to start the action. On 
defense, Sargon counterattacks and 
takes risks, accepting gambits and sac- 
rifices as a point of honor, and under- 
valuing the attacker’s initiative. This 
makes it an exciting opponent for the 
gambit player. 

Endgames are not 2.5’s strongpoint, 
though it is much better at endings than 
other microcomputers, and consider- 
ably improved over Sargon II. With 
King and Queen or Rook vs. King, 
Sargon mates in at most 15 moves at 
Level 1. With the advantage of two 
Bishops, Sargon mates in at most 17 
moves at Level 3 , but draws at Level 2. 
Sargon cannot carry out the difficult 
mate with a Bishop and Knight advan- 
tage from the general position (White: 
K,al; B,dl; N,d8 — Black: K,d4), 
tending to drive the King into the wrong 
comer and being unable to drive him 



Diagram 1 

3000 




over from there to the right comer. In a 
favorable position, where the King has 
to go to the right comer (White: K,f4; 
B,e4; N,c4 — Black: K,f2) Sargon can 
carry out the mate at Level a4. 

King and Pawn endings present 
problems that Sargon cannot yet solve 
— for example, the classical position 
(White: K,e3; p,d2 — Black: K,d5) in 
which Sargon always plays 1 d4, draw- 
ing, instead of 1 Kd3, winning. Even in 
a more favorable position (White: 
K,d4; p,d3 — Black: K,e6) Sargon 
goes wrong: 1 Kc5 Ke5 2 d4+ Ke6 3 
d5 + , drawing, instead of 3 Kc6, win- 
ning. In these and more complicated 
endings with Pawns and pieces, Sargon 
fails to win won positions but defends 
fairly well. 

One important feature in Sargon’s 
endgame play is the change in its move 
evaluation algorithm at move 30, to 
allow Sargon’s King to play a more 
aggressive role. This can have interest- 
ing results in games where many pieces 
are left when the algorithm changes 
(see match game 3, Level 4). 

Sensation at the Herman Steiner 
Chess Game 

On Sargon’s first visit to the Herman 
Steiner Chess Club in Los Angeles, it 
was challenged by a wily veteran 
whose rating, before retiring from 
tournament play, was in the high 
1900’s. The game was played at Level 
4, and in the apparently balanced posi- 
tion of Diagram 2, Sargon (Black) un- 
leashed a terrific attack: 



BORIS 2.5 vs. 1900 PLAYER 
(Level 4) 




Diagram 2 



1. ... b5! 

2. Qd3 Bb7 

3. Ne3 

Radi was better 
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3. ... 


c4 


4. Qe2 


g5 


5. Nd4 




White must lose a piece, so he seeks attacking 


chances 




5. ... 


Qb6 


6. Nexf5 


gxf4 


7. Qh5 




White does 


seem to have some threats: I was 


hoping Sargon would play . . .Qg6. Instead: 


7. ... 


Rxf5!! 


8. Nxf5 


Qxf2+ 


9. Khl 


Ng3+! 


10. hxg3 


Qxg2 mate! 


Bravo! 




Other opponents at Level 4 weren’t 


able to finish their games. These frag- 


ments are interesting: 




White — Category HI: 




Sicilian Defense 


l.e4 


c5 


2. Nf3 


d6 


3. d4 


cxd4 


4 Nxd4 


e5 


5. Nb3 




Nb5 was better 


5. ... 


Nc6 


6. c4 


Nf6 


7. Nc3 


Be7 


8. Be2 


Be6 


9. 0-0 


0-0 


10. Be3 


Rc8 


11. Nd2 


a6 


12. b3 




Rc 1 was better 


12. ... 


Nd7! 


13. f4 


exf4 


14. Bxf4 


Bf6! 


Sargon now wins a Pawn: 


15. Rcl 


Qa5 


16. Qc2 


Nb5 


17. Qbl 


Bxc3 


18. Rxc3 


Nxa2-+ 




White — Expert: 




King’s Indian Attack 


1. Nf3 


d5 


2-g3 


c5 


3. Bg2 


Nc6 


4. 0-0 


e5 


5. d3 


Be7 


6. e4 


Be6 


7. exd5 


Qxd5 


8. Rel 


Qd6 


9. Nc3 


0-0-0?! 


Risky — Sargon underestimates White’s attack- 


ing chances 




10. a3! 


Nf6 


11. b4 


cxb4 


12. axb4 


Qxb4 


13. Bd2 


Qc5 


14. Qbl 




With strong pressure for the Pawn 


14. ... 


Ng4 


15. Re2 


f6 


16. h3 


Nh6 


17. Qb2 


Nf5 


18. g4 


Nfd4 


19. Nxd4 


Qxd4 


20. Re4 


Qd6 



21. Rea4 a6 

22. Be3 Rd7 

23. Rbl Rhd8?! 

Better was . . .Kd8 escaping to the Kingside 

24. Ne4 Qb8± 

Now White could cash in by 

25. Nxf5 Bxf6 

26. Bxc6 Rc7 

27. Rxa6 with a Pawn plus. 

Rapid Transit at Level 2 

Most of the games at the Steiner Club 
were played at Level 2, with the chal- 
lenger allowed 5 minutes on a chess 
clock and Sargon having 12 minutes on 
its internal clock — keyboard time not 
counting. This works best with a non- 
playing Sargon operator, but the soli- 
taire version is also fun once the dis- 
traction of keyboarding is mastered. 

Sargon is surprisingly good at this, 
enjoying a big plus score against all 
comers. It sees much further than one 
would expect at Level 2 — for example, 
in the position of Diagram 3, from a 
rapid-transit game, D. Welsh — Chess 
4.8 which continued: 1 a5!? Qxg3? 
After . . .Rh8! White resigns 2 axb6 
Qxf4 3 bxc7+ “Oh, you had THAT!” 
Kxc7 and White announced mate in 3. 
When Sargon was confronted with this 
position at Level 2, it answered 
1 . . .b5 evading the trap. 



BORIS 2.5 Tests a Problem 
(Level 2) 




End Position: Welsh vs. Chess 4.8 



Here are two interesting rapid-transit 
games against a Category D player: 
Black: 



Sargon 2. 


5 Scotch Game 


1. e4 


e5 


2. Nf3 


Nc6 


3. d4 


exd4 


4. Nxd4 


Bc5 


5. c3?! 


Bxd4?! 



Sargon loves to exchange Bishop for Knight 
6. cxd4 Nf6 



7. e5?! 


Qe7 


8. Be2 


Ne4 


9. Nc3 


Qb4 


10. Qd3 


d5 


11. f3 


Nxc3 


12. bxc3 


Qe7 


13. a4! 


Qd8 


14. Ba3 


f6 


15. exf6 


Qxf6 


16.0-0 


Bf5 


17. Qb5 


0-0-0 


18. a5 

a6 was essential 


Qe6 


19. Rfel 


Qe3+ 


20. Khl 


Qxc3 


21. Reel 


Qxd4 


Sargon is a Pawn-snatcher 


22. Bc5 


Qf6 


23. a6 




White presents the bill for damages 


23. ... 


b6 


24. Bgl 


Nd4? 


Nb8 was the only chance 


25. Bxd4 


Qxd4 


26. Qc6 


Qe5 


27. Bb5 


Qxh2+ 


28. Kxh2 


Rd6 


29. Qa8 

White: 


mate 


Sargon 2.5 Pirc-Robatsch 


1. e4 


d6 


2. d4 


Nf6 


3. Nc3 


g6 


4. Nf3 


Bg7 


5. Bc4 


0-0 


6. Be3 


Bg4 


7.0-0 


Nd7 


8. Rel 


e5 


9. Qe2 • 


a6 


10. Radi 




Economical development 


10. ... 


Qc8 


11. Rd2 


b5 


12. Bd5 


Rb8 


13. Redl 


b4 


14. dxe5!? 




Safer was Nbl , but this is an impressive combina- 
tion for rapid-transit 


14. ... 


bxc3 


15. cxd6 


cxd2 


16. fxg7 


Kxg7 


17. Qxd2 


Bxf3 


18. Qd4+ 


Ne5 


19. gxf3 


Kg8 


20. Kg2 


Qd7 


21. Bb3 


Rbd8 


22. Bc4 


c5?! 


23. Qd5 
Nxc4 is better 


Qe6? 


24. Qxe6 


fxe6 


25. Bxe6+ 


Kg7 


26. Bg5! 


Rde8 


27. Rxd6 


NxG 


28. Rd7+ 




And Black’s flag fell in a lost position, e.g. 


28. . . . 


Kh8 


29. Be7! 


Rf4 


30. Kg3 

3 1 . Bf5 


g5 
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Boris 2.5 vs. Sargon II 

A friend arranged to play his Apple II 
version of Sargon II against Boris 2.5. 
Both have the same 7 levels of play, but 
Boris 2.5 can predict a move and think 
on the opponent’s time. With its faster 
clock speed, this allows Boris 2.5 to 



play much faster. Due to the similarity 
between the programs, Boris 2.5 antic- 
ipated most of Sargon IPs moves and 
had an answer ready. Two games were 
played at Level 3, Boris 2.5 winning 
both. These games will be shown in 
next month’s continuation of this article. 
Whether you have the stand-alone unit 



labeled Sargon 2.5 or the unit called 
Boris 2.5, you have the best around — 
as of September 1st. After that date, a 
number of computer chess tournaments 
have been scheduled. Perhaps by the 
time you read this, a new king will be 
on the throne. 



Six Test Problems 

for Chess-Playing Machines 



RESULTS: The “Foster” Test: 



Problem 


Length 


Early 

BORIS 


CHALLENGER-7 


BORIS-2.5 


DUCHESS 


1 


4 Moves 


No solution 
in 24 hours 


No solution 
in 8 hours 


Missed the mate 
(tested on its 
highest level) 


Solved it in 
0.24 seconds 


2 


2 Moves 


Solved it in 
2 hours 


Solved it in 
14 minutes 


Solved it in 
50 seconds 


Solved it in 
0.23 seconds 


3 


2 Moves 


Solved it in 
1 1 minutes 


Solved it in 
3 minutes 


Solved it in 
25 seconds 


Solved it in 
0.32 seconds 


4 


3 Moves 


Not tested 


Solved it in 
33 hours 


Solved it in 
8 min. 24 sec. 


Solved it in 
0.32 seconds 


5 


3 Moves 


Not tested 


No solution 
in 10 hours 


Found the best 
move in 18 min. 
Also found “The 
Cook” 


Duchess 
“Cooked” the 
problem. See 
Below 


6 


2 Moves 


Solved it in 
35 minutes 


Solved it in 
4 minutes 


Solved it in 
48 seconds 


Solved it in 
0.6 seconds 



BY DR. W. W. FOSTER 



Here’s a sobering thought: if you are 
rated 1500 or below, you are now able 
to purchase a preprogrammed, chess 
computer for a few hundred dollars or 
less that will beat you consistently at 
chess! (And every year sees the machine 
ratings creep upward.) 

Today, there are at least 10 prepro- 
grammed models on the market, the 
best known being the BORIS 2.5 
series, as well as home computer pro- 
grams such as, SARGON I, SARGON 
II, and MYCHESS, all running on an 
Apple, Pet or TRS-80. 

Of course, if you have friends, you 
can try one of the programs designed 
for the ultrafast, large mainframe com- 
puters like Tom Truscott’s DUCHESS 
at Duke (written by Tom Truscott, 
Bruce Wright and Eric Jensen), Ken 
Thompson’s BELLE at Bell Telephone 
Labs in New Jersey, or David Slate and 
Larry Atkins’ CHESS 4.9 at North- 
western University. 

The real dilemma for most of us, 
however, is which unit will play the 
strongest chess within a reasonable 
time limit for the most reasonable 
price. 

I personally have owned five of the 
home units and have tested two others. 
Also, I have written to all of the manu- 
facturers asking for information and 
have collected results from several 
microchess tournaments. 

First, let me remind you that infor- 
mation in the past from the manufac- 
turers was for the most part misleading. 
Long after two 1978 tournaments were 



played in which an early BORIS model 
did poorly, I was assured in a letter 
dated 9/7/79 that regarding BORIS “as 
of now, there is not a stronger computer 
on the market.” 

As to the microchess tournaments, 
the results were sometimes contradic- 
tory and not reproducible. But they did 
have some value. In the 1978 West 
Coast Computer Fair, SARGON II beat 
CHESS CHALLENGER-10 by 5 
points to 3 , but in the Personal Comput- 
ing Microchess tournament in 1978, 
CHESS CHALLENGER- 10 finished 
ahead of SARGON I with 1 1 points to 
8-1/2. These tournaments were, how- 
ever, too infrequent and the technology 
is continuously improving. 

What is needed is a simple, easy-to- 



apply test for each new program that 
would rate chess playing speed and 
strength. To this end, I have used the 
first six problems in Reinfeld’s 1001 
Brilliant Ways to Checkmate (1979 
Edition, Published by Wilshire Book 
Company, 12015 Sherman Road, No. 
Hollywood, CA 91605), and recorded 
the time required to solve these 2, 3 and 
4 move problems. Also, Tom Truscott 
at Duke University has tried these prob- 
lems on DUCHESS and has arranged 
for them to be run on BELLE, for com- 
parison purposes. 

DUCHESS solved problems 1, 2, 3, 
4, and 6 in less than one second each! 
Also, DUCHESS found the unusual 
Move 2 . . .Kd7 for Black in problem 5 
which was not considered by Reinfeld 
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and which delays mate for several 
moves! Similarly, BELLE solved them 
all in about the same time as DUCHESS 
and also in problem 5 discovered the 
“cook” 2... Kd7 for Black. 

Clearly, CHALLENGER-7 was strong- 
er than early BORIS, but BORIS-2.5 was 
significantly stronger than the “7”. Since 
the “Foster Test” indicated that BORIS- 
2.5 was stronger than “7”, I tested the 
validity of this result by matching these 
two machines in a two game contest 
using level 3 on BORIS-2.5 (45 to 90 
seconds per move) and also level 3 on 
CHALLENGER-7 (one minute, 20 
seconds per move). According to 
BORIS-2.5’s internal clock, it used an 
average of 68 minutes per game and 
CHALLENGER-7 used 81 minutes. 
BORIS-2.5 won both games with- 
in 50 moves. 

In other testing, BORIS-2.5 was 
notably stronger than CHALLENGER- 
7 when shorter time limits were used 
for both computers. At longer time 
limits, BORIS-2.5 was still stronger than 



CHALLENGER-7, but the relative dif- 
ference in their respective strengths was 
less. Also, BORIS-2.5 playing at 10-15 
seconds per move (level 1) beat 
CHALLENGER-7 at one minute and 
twenty-seconds per move (level 3) con- 
sistently. 

As to CHALLENGER-10 and VOICE 
CHALLENGER: my own experience 
with these machines tells me that VOICE 
CHALLENGER and “7” are equally 
strong, but “VOICE” has a larger open- 
ing Book in memory and, of course, it 
can speak. CHALLENGER-10 is weaker 
than “7” or “VOICE.” The BORIS 
MASTER (another model of the early 
Boris series) runs the “Master chip” and 
so is said to be twice as fast as BORIS. It 
may be better in this one regard; (speed) 
than the BORIS, but it has the same 
algorithms (programs). 

BORIS-2.5 has a capability for think- 
ing on the opponent’s time and has a 
replaceable module so it can be updated 
in the future. It seems to be an im- 
proved version of the Sargon-H pro- 



A Machine Fault 




After White’s move of Kg5, the Computer 
knocks off White’s Bishop but lets the 
pawn get away. 



gram by Dan and Kathe Spracklen, 
with some ideas borrowed from Dr. 
Hans Berliner, an authority on artificial 
intelligence, and from the Chess 4.9 
program. This machine also has a re- 
verse! If you make an error you can 
back up as many as three moves. 

I am currently rated 1600. I played 
BORIS-2.5 a two game match under 
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tournament conditions (i.e. 40/90) and 
won both games with reasonable ease. 
At 5-minute chess, however, BORIS- 
2.5 often beats me. It, of course, does 
not make tactical errors. 

But before you rush out to buy 
BORIS-2.5 consider this Machine 
Fault Diagram reached in one of my 
games with it. Here I played Kg5 and 
BORIS-2.5 replied. . .KxB?, then e6, 
etc. and the pawn can’t be stopped! 
Very few human players would make 
this error, except in time pressure, but 



the dedicated computers all play poorly 
in the end game because of the “horizon” 
effect, i.e. , they can’t calculate beyond 
about four moves. Advantages beyond 
four moves such as queening the pawn 
in the above example are not 
considered. 

In summary, I believe there are two 
best buys: If you are rated 1300 or be- 
low, you may pay about $90.00 for 
CHALLENGER-7 and expect it to give 
you a good game, or if you are rated 
higher you can pay around $300 for the 



SARGON-2.5 system (also sold as 
BORIS 2.5) and expect it to give you a 
real challenge at the higher levels. Both 
units are easy to operate. 

Any readers who have access to 
MYCHESS or any other chess com- 
puters are invited to present Reinfeld’s 
six problems to their machines and to 
send the results (plus other pertinent 
information or inquiries) to me for a 
follow-up article. (Dr. W. W. Foster 
can be reached at 3617 Lubbock Dr., 
Raleigh, NC 27612.) 



What Chess Programs Don’t Do (Part I) 



BY NORMAN WHALAND 



Chess programs are caricatures of 
human chess reasoning. They empha- 
size a few of the methods used by human 
players and neglect many others. Be- 
cause sheer speed partially compen- 
sates for the limitations of the pro- 
grams’ simplified reasoning, the best of 
them are able to compete with strong 
amateurs. There are indications that the 
ability of programs is reaching a pla- 
teau, however. Machine play at the 
master level is likely to require further 
ideas borrowed from human chess 
reasoning. 

As former world champion Dr. 
Emanual Lasker pointed out (in 
Lasker's Manual of Chess, available as 
a Dover paperback), there are two 
essentially different ways of looking at 
a chess position. We can think forward 
from the given position, trying out forc- 
ing moves in the hope of hitting upon an 
advantageous sequence. Alternatively, 
we can think backward from a goal. 
Thinking backward is more compli- 
cated, in that we must not only decide 
on a goal, but must also know how to 
select moves appropriate for reaching 
it. The compensating advantage is that 
goals restrict the search and thereby 
deepen it. 

Programs use the thinking-forward 
method almost exclusively. They typi- 
cally have a few broadly applicable 
strategic goals, such as development of 
the pieces, pressure on the opponent’s 
king position, and control of the center. 



Since some of the goals aren’t appro- 
priate for all stages of the game, the 
programs modify their goals at the 
transitions from opening to middle- 
game and from middlegame to end- 
game. For the most part, however, the 
goals don’t change from move to move, 
and they aren’t specific enough to nar- 
row the search very much. 

Human players set a much wider 
variety of goals, both strategic and tac- 
tical. Their goals are determined not 
merely by the stage of the game but also 
by specific features of the position, 
such as weak pawns, immobile pieces, 
or weaknesses of the king’s position. In 
addition, goals are derived from the 
results of dynamic analysis. Highly 
specific tactical goals drastically limit 
the search, so that people can find much 
longer combinations than programs 
can. Precise strategic goals give human 
play a consistency of purpose that is 
particularly important in the endgame. 

The incorporation of more goal- 
directed thinking in chess programs 
may significantly improve their per- 
formance. The examples that follow 
illustrate the kinds of goals that can 
occur, the ways in which they are set, 
and the effects that they have on the 
choice of moves. Brief and incomplete 
as this survey is, it gives some indica- 
tion of the benefits as well as the diffi- 
culties of the use of goal setting in 
programs. 

A Target Square 

One of the most common goals is the 
exertion of pressure on a particular 



RUBINSTEIN vs. SAL WE, (Lodz 1908) 




Diagram 1. Position after 10...Be7 



square. The choice of the square is 
usually determined mainly by the pawn 
structure. Sometimes the pressure is 
directed against a freeing pawn move. 
If the square can’t be defended by an 
enemy pawn, the aim is to occupy it 
with a piece. Both motives can be seen 
in the following example. 

Black’s c pawn is potentially vulner- 
able because it is backward on an open 
file. Its advance is prevented for the 
moment by white’s pressure on the d 
pawn. On the other hand, if black 
should later succeed in mobilizing his 
central pawns, they could become a 
powerful weapon. Consequently, con- 
trol and occupation of c5 are crucial. So 
vital did Rubinstein consider this goal, 
that he violated several principles of the 
opening in its pursuit. 

11 Na4. He breaks three rules at 
once: he moves a piece twice in the 
opening, moves a knight to the rim, and 
removes pressure from the center. 



October 1980 Personal Computing 83 



COMPUTER CHESS 



11 . . .Qb5 12 Be3. It’s almost 
always bad to block a center pawn like 
this. The problem for chess pro- 
grammers is to prevent such a move 
most of the time while enabling the 
program to recognize the exceptions. 

12 . . .0-0 13 Rcl Bg4 14 G. It’s not 
nice to block one’s own bishop, but 
white prefers not to divert resources 
from the main task. The c5 goal influ- 
ences all of his choices. 

14. . .Be6 15 Bc5 Rfe8 16R£2 Nd7 
17 Bxe7. This move is necessary to 
keep open the possibility of occupying 
c5 with a piece. 

17.. Rxe7 18 Qd4 Ree8 19 Bfl 
Rec8 20 e3 Qb7 21 Nc5 Nxc5 22 Rxc5. 
The pawns are finally blockaded, 
weak, and useless. White won a pawn 
in a few more moves. 

The selection of c5 as the target 
square depended on simple criteria, 
easily implemented on a computer. 
Sometimes the relative importance of 
the square is more obscure. 

Hidden Goals 

In most positions, several plausible 
goals suggest themselves. Static con- 
siderations may not be sufficient to 
decide among them. Sometimes the 
crucial goal is evident only in future 
positions visualized in analysis. In this 
position, Alekhin thought for one-half 
hour before choosing a target square. 

MARSHALL vs. ALEKHIN (New York 1929) 




Diagram 2. Position after 42. Qd2 



Black is the clear exchange ahead 
and also has positional advantages. He 
has a passed pawn, and his queen exerts 
cramping pressure, nevertheless, Black’s 
task is difficult because of his exposed 
king and his loose, ineffective pieces at 
d8 and b7. 

White’s immediate threat is 42 Qd4 



followed by Qh8+. Black has no good 
way of preventing the invasion and can 
only try to blunt its effect. The removal 
of white’s queen would increase the 
danger to his own king, suggesting that 
black counter the threat by increasing 
his pressure there. On the other hand, 
defensive measures in black’s own king’s 
field may be in order. Alekhin con- 
sidered, among others, this variation: 

41 . . .Ba6 42 Qd4 Rc2. White must 
now proceed by a series of checks to 
avoid instant checkmate. 

43 Qh8+ Ke7 44 Qf6+ Kd7 45 
Qxf7+ Kc8 46 Qe6+ Qxe6 47 dxe6. 
Black can no longer expect to win. If 
black had controlled e6, white would 
have run out of checks and lost. This 
variation shows that controlling e6 is 



‘ ‘Base your Analysis 
on Target Squares 
and hidden goals. ” 



more important than activating the bis- 
hop. Therefore Alekhin played 
41 . . .Re8 and eventually won. 

From this example we see the two- 
way connection between goal setting 
and analysis. For the purposes of his 
analysis, Alekhin assumed that each 
player would attack the opponent’s 
king. This was a reasonable starting 
point, because both kings were ex- 
posed. He undoubtedly realized at the 
beginning that he might have to make a 
move to defend his king, but to find the 
right move he needed to trace the course 
of the opponent’s attack. The goal of 
attacking the kings limited the possibil- 
ities sufficiently for a deep analysis. 
The weakness of e6 so revealed led him 
to set the goal of guarding it, which he 
was able to accomplish immediately. 
Thus, goals shaped his analysis, and 
the analysis in turn prompted an addi- 
tional goal. 

A static appraisal of the original posi- 
tion wouldn’t suggest that e6 needed 
further protection. Of course, the acti- 
vation of the rook by 41 . . .Re8 might 
have been chosen on general prin- 
ciples, but so might several other 
moves. Only by concrete analysis 
could the crucial square by pinpointed. 

In this position, the same method 



MIESES vs. Alekhin (Scheveningen 1913) 




Diagram 3. Position after 17. Rcl 



revealed a subtle trap. Black sees com- 
binative possibilities in 17 . . .Nxc2 18 
Rxc2 Nb4, since the rook seems hard to 
defend. For example: 19 Bdl Rxdl+, 
or 19 Bd3 Nxd3 20 Qh5 g6 21 Qxh4 
Nb4. 

White can slip out, however, with 19 
Nd3. Then 19 . . .Nxd3 is answered by 
20 Qxf5. Likewise, 19...Bxd3 20 
Bxd3 Nxd3 21 Rxc7 and 19 . . .Be4 20 
Nxb4 Bxf3 21 Bxf3 are not good for 
black. The combination fails only be- 
cause the bishop at f5 is unguarded. 
Therefore Alekhin played 17 . . .g6, 
deviously attacking the c pawn, but 
white saw the trap and replied 18 g4. 

Goals derived from possible future 
positions occur frequently in human 
play. By contrast, some programs de- 
rive no information at all from a varia- 
tion except the evaluation of the final 
position. Other programs, such as those 
that use the killer heuristic, achieve a 
limited transfer of information between 
variations. The heuristic applies when 
most of the moves in a position can be 
refuted by the same “killer” move, as 
when a piece is en prise. The programs 
save such moves and try them first in 
subsequent variations. 

Human players learn far more from 
the variations they consider. The early 
stages of analysis provide insights that 
guide the later stages. The examples 
just given barely hint at the variety of 
insights so gained. For example, analy- 
sis may demonstrate the immobility of 
a piece or reveal hidden effects of a 
move. It often suggests possibilities to 
be alert for as play proceeds. The learn- 
ing that goes on during anlysis is one of 
the most striking differences between 
human and computer play. (Part II, 
next month) 
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BORIS 2.5 Sparkles 



The big debate these days is which micro- 
chess program is the better one: BORIS 
2.5 or MYCHESS. Documented argu- 
ments are coming from both directions. 
In the following game, played earlier 
this year at the San Jose City College 
Open, BORIS 2.5 was the victor. 
Another game between these two pro- 
tagonists will show where MYCHESS 
has won. The BORIS win is analyzed 
here by Morris Miller. 



BORIS 2.5 vs Mychess 



1.N-KB3 


P-Q4 


2. P-KN3 


N-KB3 


3. B-N2 


N-B3 (a) 


4. P-Q4 


P-K3 


5. N-B3 (b) 


B-Q3 


6. 0-0 


0-0 



BORIS 2.5 vs. MYCHESS 




Position after White’s 17th Move. 

7. B-N5 P-KR3 

8. BxN QxB 

9. P-K4 PxP 



10. NxP 


Q-B4 


ll.NxB 


PxN 


12. N-R4 (c) 


Q-QN4 


13. P-Q5 


PxP 


14. BxP 


QxP 


15. BxN 


PxB 


16. QxP 


B-K3 


17. N-N6 (d) 


(Diagram) 
R (Rl)-Ql? 


18. QxP 


PxN? 


19. QxBch 


K-R2 


20. Q-N3 


R-QN1 


21. QxQ 


RxQ 


22. R(KB1)-B1 


R-B3 (e) 


23. R (Rl)-Nl 


RxRP 


24. R-Rl 


R(B3)-R3? (f) 


25. RxR 


RxR 


26. P-QB4 


P-QR4 


27. P-B5 


P-R5 


28. P-B6 


R-K7 


29. P-B7 


R-Kl 


30. P-B8=Q 


Resigns 



Notes to BORIS 2.5 vs MYCHESS 

(a) It is refreshing to see that more openings have been fed 
into BORIS but here the text move should be replaced by 
3- . . .P-Ba4. 

(b) A similar mistake. Since white should strive to open 
up the line of its fianchettoed bishop against the center 
P-QB4 is required. 

Perhaps what is needed is to program long range goals for 
the opening as well as specific lines of play. Some years 
ago Dr. Reuben Fine wrote a remarkable book, “The 
Ideas Behind The Chess Openings” advocating this idea 
(for humans!) but it applies to programs as well. 

(c) Now white should play R-K; Q-Q2, with P-QB4 and 
P-Q5 in the offing. If the text is played it should be with a 



view toward an eventual P-KB4 to restrain the black king 
pawn. There is no hurry to play P-Q5 since if black 
attempts to prevent it white will have other initiatives. 

(d) The long striding bishop is always better in an open 
position, so BORIS does best to seek complications. 
Black should play 17-.. .KR-Q1; 18-QxP, BxP; 19-N- 
B4, QR-B1; 20-Q-R4, RxP; (not 20-Q-R6, B-B5); 21- 
QxP, R(Q1)-Q7 etc. 

(e) Black misses a drawing chance: 22-. . .R-QB1; 23- 
P — QB4, R-KB1; 24-P-KB4, P-N4!; 25-PxP, R(KB1)- 
B7 with a perpetual check. Or 24-R-KB 1 , R-QB7 ; 
25-R(QRl)-Bl, R(Bl)xP etc. 

(f) Much better is 24- . . .RxR; 25-RxR, R-B3; 26-R-B1, 
P-N4 and K-N3 etc. Black gains a move in this line since 
white’s rook has to be behind the passed pawn. 



The battle of Boris 2.5 vs Sargon 2.5 



Many letters from our readers have led 
us to query both the Chafitz Co. , and 
Applied Concepts as to the current situ- 
ation of the BORIS/SARGON confu- 
sion. Letters were sent to both com- 
panies, but as of the August issue, only 
Applied Concepts had replied. The 
following letter was sent on June 18, 
1980 to Steve Chafitz of Chafitz 
Company: “Enclosed is a photostat of 
the statement that Jim Morgan of 
Applied Concepts has sent us. It is 
scheduled to appear in the August issue 
of Personal Computing. Hopefully a 
response from you will clear up a lot of 



questions now being asked and will 
also indicate the future direction of 
Chafitz.” No reply was received from 
Steve Chafitz until August 18, 1980, 
after publication of the Applied 
Concepts statement. At that time we 
received the following note: “Recent 
articles in your July and August issues 
are misleading. The article implies that 
the product (Modular Game System) is 
new to the marketplace. It is . . .the 
exact same product . . .as the Chafitz 

Modular Game System Chafitz is 

the owner of all proprietary rights to the 
Modular Game System and Chafitz 



introduced this product in January 
1979. Currently we are in litigation 
with Applied Concepts regarding our 
contractual disputes. I feel that the 
articles created considerable confu- 
sion, do not accurately present obvious 
facts and more disappointing they do 
little in aiding the growth of a market 
Chafitz has dedicated so much effort to: 
electronic chess. Sincerely, Steve 
Chafitz.” Steve Chafitz certainly 
deserves a lot of praise for his untiring 
efforts in promoting “stand-alone” 
chess-playing computers. We are sorry 
he saw fit not to respond to the Applied 
Concepts’ story until after it was in 
print. 
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Classifieds 



Rates for advertising in this section: $1 
per word. Minimum. 15 words. Allow 
two months for appearance (usual pub- 
lication lag). Announcement of human 
tournaments that are open to computers 
published without charge. Send all sub- 
missions for this section to COMPUTER 
CHESS CLASSIFIED DEPARTMENT. 



OTHELLO FOR TRS-80 

Intelligent OTHELLO opponent for both 
novice and expert. Five levels of play, 
neat graphical display, move selection 
in 30 seconds or less. TRS-80 tape ($12) 
requires Level II and 16K and has REAL- 
TIME Lunar Lander program on flip 
side. Apple tape ($16) requires integer 
BASIC and 24K and has OTHELLO for 
Disk system on flip side. Peter Frey, 
2407 Prospect Avenue, Evanston, IL 
60201 . 



GOMOKU FOR MICROS 

Play an intelligent game at university 
level! Five Stones Software's GOMOKU 
program is available for North Star or 
CP/M in 5-1/4" single or double density 
disks or in 8" single density disks. Also 
available in cassette for TRS-80, Level II, 
32K. $29.95, any choice. Visa or Master- 
card accepted. Five Stones Software, PO 
Box 1369, Station B, Ottawa, Canada, 
K1P5R4. 

SFINKS FOR TRS-80 (NEW) 

Play against the fastest and strongest 
chess program ever written for the TRS- 
80! 32K Level II cassette and instructions 
$50. Available soon for other micros. 
William Fink, 1300 S.E. 3rd Ave., 
Deerfield Beach, Fla. , 33441. 

INFORMATION BULLETIN 

Bally Monthly Newsletter. Contains pro- 
grams/instructions for: Othello; Golf; 
Connect Four; Life; Electric Bill; Three 
Voice Music; Wumpus; Galactibattle; 
DMA Graphics; Machine Language; 63 
Key ASCII Keyboard; Printer; Memory 
Expansion; Voice Recognition; 7 Tech 
Manuals; Products, etc. $2.00 Sample 
Issue OR $9.75 - 6 Issues; THE CUR- 
SOR GROUP, 59 East Orange Grove 
Ave., Burbank, CA 91502, (213) 

843-7332. 



BACKGAMMON CASSETTE: 

The GAMMON CHALLENGER gives all 
backgammon players a battle. Has 3 
levels of play. Switches sides, tests prob- 
lems and stores positions in memory. 
Available on TRS-80 cassette for either 
Level 1 or Level 2. $14.95 each. Com- 
puter Cablevision, 2617 42nd Street, 
NW, Washington, DC 20007. 

COMPUTER POSTAL CHESS: 

Join the First Annual North American 
"Open Computer Postal Chess Tourna- 
ment." All computers are welcome to 
enter. Your program will play three 
other programs in simultaneous games. 
Round Robin tournament style. You can 
participate from your own living room. 
Trophies to winners. Send your name 
and address for further details to Varn 
Fields, PO Bos 8202, Philadelphia, PA 
19101. 24-hour telephone: (215) 222- 
0367 

NEW! SARGON/BORIS 2.5 

Chafitz modular games system featuring 
the world's strongest playing microcom- 
puter chess program! (Plays above 1500 
level in tournament time.) We have 
SARGON 2.5 plus the Response Board 
in stock and available for immediate de- 
livery! Write or phone, 24 hours a day 
for free discount price list, brochure, and 
an in-depth technical report. Palmer, 
McBride and Kincaid Associates, PO Box 
598, East Brunswick, NJ 08816. Tel. 
(201) 246-7680. 

JOIN: 

ICCA (International Computer Chess 
Association.) $10 annual membership 
includes the ICCA NEWSLETTER with 
computer-chess news from all over the 
world. (Back issues, $2 for set of three.) 
Send U.S. check or international money 
order to ICCA, c/o Ken Thompson, 
Room 2C423, Bell Telephone Labs, 
Murray Hill, NJ 07974, USA. Editorial 
material for the ICCA Newsletter should 
be sent to: B. Mittman, Editor, ICCA 
NEWSLETTER, Vogelback Computing 
Center, Northwestern University, Evan- 
ston, IL 60201, USA. 

TAPE 'N TEXT: 

Learn how to program your own com- 
puter games! Introducing our best selling 
BASIC Programming Course — used in 
over 700 schools and businesses. You 
can acquire proficient use of the lan- 
guage. Order your personal copy today! 
BASIC Programming Course consists of 
12 audio cassette tapes with 12 printed 
texts. The tapes are narrated by William 
R. Parks. It sells for $59. Tape 'n Text, 
Williamsville Publishing Company, PO 
Box 250, Fredonia, New York 14063. 



NEW TOP-NOTCH CARD GAME 

Draw Poker for TRS 80 on tape or disk. 
$25. Satisfaction guaranteed. Serious 
programming effort with strategy based 
on study of millions of computer vs. 
computer games plus play against human 
on Micronet. Send $25 to Jim's, PO Box 
172, Louisville, Ohio, 44641. Phone 
(216) 875-4835. Price list free. (Dealer 
inquiries invited.) 

CHESS FOR CP/M SYSTEM WANTED 

I would like to buy chess software for 
my CP/M system. I am especially inter- 
ested in the latest versions of SARGON 
or MYCHESS on 8" CP/M diskettes. 
Gary J. Ellis. 109 Harrington. Willing- 
boro, NJ 08046. 

CHESS OR BRIDGE PROGRAM 
WANTED 

I have a North Star Horizon, 48K single 
density with two 5" drives and 120 
sources. I am looking for a game of chess 
and bridge. Please send information and 
prices to James R. Starkey, Pacific Asia 
Int'l Inc., 182, Sec. 6. Chung Shan N. 
Rd. Lan Ya Lee. Tienmu, Taipei. Taiwan 
Republic of China. 

COMPUTER-CHESS BOOK 

Learn the psychological secrets of be- 
coming a strong chess player! "How to 
Beat Most People and Computers at 
Chess." (Secrets of a Grandpatzer.) By 
Kenneth Mark Colby, Professor of Psy- 
chiatry and Computer Science, UCLA. 
Hardcover. 153 diagrams. 141 pages. 
Figurine Notation. For personal auto- 
graphed copy, send $20 (check or money 
order) to MALIBU CHESS PRESS, 
25307 Malibu Road, Malibu, CA 90265. 
(CA residents please add 6%.) 

OTHELLO (REVERSI) FOR 
APPLESOFT 

Hi-Re real life graphics. Can be played 
by two people, you against computer, or 
computer against itself with different 
strategies. Three built-in position-based 
strategies plus your own. Move in 17 sec- 
onds or less. Written all in Applesoft 
Basic. Requires only 16K Applesoft. In 
cassette ($15). Chen & Co., POB 353 
Pine Brook, NJ 07058. 

ENTER A GOMUKU TOURNAMENT 

Do you have a GOMOKU program? 
Would you like to write one? Those with 
own programs can enter an International 
GOMOKU Tournament and, if # 1, can 
take on the European champ. For more 
information on the GOMOKU Tourna- 
ment itself, write to Dr. Shein Wang, In- 
stitute of Computer Science, U. of 
Guelph, Guelph, Ontario, N1E 1C8. 
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Of Strategy and Logic 





Gomoku - A Tournament Game 



BY MICHAEL T. COMPTON 

Five Stones Software , Ottawa 



I recently described the ideas I used in 
programming Gomoku, and some com- 
binations to give you an impression of 
how such ideas are put into practice. 
Description of a full tournament game 
will give you an idea of what is in- 
volved in the different stages of the 
game. 

I would suggest that readers use 1/4" 
squared paper, and mark the vertical 
coordinate with numbers from 1 to 19 
and the horizontal coordinate with let- 
ters from A to T, (notice no letter I). 
This is the easiest way to follow the 
action, marking x for black (who goes 
first) and O for white (memory aid — 
the O looks like a white stone). 

At the 1980 North American tourna- 
ment my program was playing black on 
a North Star computer using CP/M. Ed 
Johnson of the University of North 
Carolina was playing white on a PDP/ 
10. My program played in a hair raising 
yet (under analysis) safe way to even- 
tually win, by giving white enough 
rope to hang himself. 

The first nine moves were from book — 

1. K10 2. J9 

3. K8 4. K 9 

5. M10 6. L9 

7. M9 8. L10 

9. Lll 

leading to figure 1. This opening is 
designed to take advantage of another 
program’s predisposition to attack 
whenever possible, creating a position 
where white is blocked in while black is 
on die outside with open 2’s that can 
link up. I had played the first 8 moves 



News on “ Intelligent ” Games of 
Backgammon , Checkers , Gomo- 
ku, Go, etc., welcomed by this 
department. Computer Chess 
and Computer Bridge appear 
separately. Address all corres- 
pondence to Computer Games 
Dept., Personal Computing. 




Fig. 1. Position after 9th move 



before in competition, losing one by 
playing L8, and winning two games 
slowly by playing M8 in 1976. I ana- 
lyzed the board position and deter- 
mined that Lll was best, expecting 
K12 from white. 

As we go through the next few 
moves, the tenor of the game is set by 
move 15, where black blocks a possible 
four on the L-file and sets up two two’s, 
and then move 19 where black chooses 
a block that again builds his own 
strength at the bottom of the board 
(figure 2). This can be dangerous since 
black is now correspondingly weak at 
the upper left — move 19 dares white to 
find a win and certainly sharpened the 
tension in the game as I watched it 





10. Mil 


11. J8 


12. L8 


13. N9 


14. 08 


15. L6 


16. H9 


17. G9 


18. J10 


19. M7 






Fig. 2. Position after 19th move 



In the next couple of moves black 
ups the ante by making the less safe 
block (if he can take the tension, I can). 

20. Kll 

21. G8 

We now go through a short phase 
where any analyst can be sure his pro- 



gram played perfectly, because the 
opponent’s moves all created fours. 

22. N12 

23. 013 24. G12 

25. Gil 26. L12 

27. M13 

Move 28 is not a four, but the re- 
sponse is forced, because if 28. M12 
then white plays 30. J12, 32. H13, 34. 
J14 winning. 




Fig. 3. Position after 29th move 



28. K12 

29. J12 30. K13 

31. J14 

(threatens 32. J14, 34. K15) 

Now a couple more fours, and we 
reach a position where white is clearly 
lost. 

32.09 

33. N10 34. M12 

35. 012 

We are now at figure 4, where black 
has lots of threats: 

A. K14, threatening M14 then N13 
or J13 then H12 then H14 

B. M8 then H8 then K6 

C. K5 then H7, then G7, then J7 and 
finally H8 

White now kills one threat, only to 
set up another (J15, L15, N13 - 2 3’s). 

36. K14 

37. K15 

White retains the initiative for a 
while but by move 43, black has come 
one move closer at the top. 

38. 010 

39. 07 40. Nil 

41. L13 42. N8 

43. M3 44. P13 

Black could have continued the win- 
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Fig. 4. Position after 35th move 



ning sequence at the top, but instead 
started on a win at the bottom. Note the 
possibility of P8(4) then Q8(4 & 4). 
Most of the time such a sequence would 
be a win, but in this case there was no 
danger because P8 would be followed 
by M8 which is a four and must be 
blocked. So if white had played P8 in- 
stead of blocking a three, it would lose. 



45. L7 46. Q8(4) 

47. P9 48. P8(4) 

49. R8 50. P7 



Black now has the initiative again and 
starts a win at the bottom, with 5 1 . M6, 
then plays a move which neither speeds 
things up nor lets white off the hook. 
51. M6 52. M8 

53. R9 54. J6 

We are now at move 55 where you 
should be able to follow black’s forcing 
9-ply coup de grace. 

55. K7 56. N7 

57. J7 58. H7 

59. H8 60. F8 

61. K6 62. L5 

63. F10, making a five and win- 
ning the game. 

A number of things are apparent in 
this game — the most obvious being 
that it is difficult to tell a program that it 
is in danger when it can delay the inevi- 
table for some length of time. By the 
same token it is not going to be possible 
to analyze openings in Gomoku by 
leaving the program with a deep search 
that will cook for a few days. A lost 
position can be a long time in the losing 
and you would need maybe forty plies 




Fig 5. Position after 54th move 

to deal with this kind of loss (assuming 
also that you could hit on all the right 
key moves which is unlikely). That 
leads us then to the conclusion that if it 
isn’t possible to find the right moves in 
an unknown opening with an ocean of 
time, it certainly isn’t possible to be 
surefooted with the alloted time in over 
the board play. The openings should 
become known by being played and the 
key moves then recorded in the pro- 
gram’s book. 



European Tournament 



The European Gomoku Tournament 
was held April 11 to 15. Torsten Bille 
swept all six of his games to claim first 
place and the championship title for 
Europe. Joszef Janos, with a 3-3 score, 
came in second. One of Janos’ two 
games with Bille is shown. Game 
comments are by Dr. Shein Wang 
(“W”) and Bille (“B”). 

BILLE (Black) vs JANOS (White) 



1. K10 


2. L9 


3. LI 1 


4. J9 


5. Mil 


6.K11 


7. M10 


8. L10 


9. N9 


10.08 


11. M12 


12. M9 



13.J12 14. K12 

15. Nil 16.N13 

17.010 18. P9 

19. Pll 20.011 

21.Q12 22. M8 

23. R 13 (Wins) 




CHAMPIONSHIP FINISH 



Dr. Wang reports that the North 
American current ladder standing is: 

1 . Ed Johnson and Arthur Coston 

2. Mike Compton 

3. John Day 

4. Shein Wang and Ed Slodysko 

5. Joel Smith 

6. Jerry Crouch 

7. Dan Kok 

8. Dick Jensen 

Any Gomoku reader interested in 
challenging a program on the ladder, 
should contact Dr. Shein Wang for 
information. His current summer 
address is 1108 6th Street, Golden, CO 
80401. 



GAME TALK: 

B: “The opening to this point (8th move) is rather tradi- 
tional. White should play 8. White should play 8. M9 
instead of L10. It gives him better possibilities. ” 

W: “No. I think 8. M 12 is much better defensively. Look 
what happened to Johnson/Coston in a similar position in 
a later game when they played M9. You must be kidding. ’” 

B: “Black at once starts his attack. At 13. J12 he blocks 



White without any letup in his attack. 14. K12 is forced. 
Then, 15. Nil! threatens in all directions (17. N12, 19. 
M13, 21. Ol l;or 17. 010, 19. PI l;or 17. L13, 19. M13, 
21. N13) and wins.” 

W: “What if at move 14 White moves to N 12, and threatens 
to make (4-3) at H9. If 15. M13, 16. M14, 17. N1 1 , then 
White responding with 18. N8, 19. 07, 20. 010, 21. 
N13, 22. 014, 23. N12, 24. N10, 25. Ol 1 (4-3) is still a 
win for Black. But White puts up a much harder fight. 
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COMPUTER BRIDGE 



Bridge on the TRS-80 and TI-99/4 



As I mentioned last month, I am devel- 
oping two bridge products for personal 
home computers with two members of 
the Dallas Aces bridge team, the 
world’s most successful bridge team 
over the past several years. Both prod- 
ucts are expected to be available at 
Christmas*or very shortly thereafter. 

These bridge products are for the 
TRS-80 and the Texas Instruments 
computers. The TRS-80 product is one 
which I am developing with Bob 
Hamman of the Dallas Aces. 

The TRS-80 program is a playing 
program with two available options. 
First, the computer can generate thou- 
sands of bridge deals, using a pseudo 
random number routine which permits 
at any time the regeneration of a given 
deal. Then, as South, you play the 
North and South cards as the declarer at 
a contract the computer suggests or one 
of your choice, while the computer de- 
fends with the East and West cards. 

You may play a deal seeing only the 
North-South cards from the beginning, 
as if you are playing at the bridge table. 
Or, you may play a deal seeing all four 
hands from the beginning, as when 
reading your favorite newspaper bridge 
column and planning your play. 

You may also enter into the TRS-80 
a deal of your choosing. Then, as 
before, you will play the North and 
South cards while the computer defends 
the East and West cards. 

The second principal option you 
have is to play one of a number of 
selected deals in an instructional mode. 
Each time it is your turn to play one of 
the N-S cards you will be given three 
chances to come up with the best or 
recommended play. If you do not select 
this play in three choices, the computer 
program will tell you what this play is, 
and you may continue with the play of 
the deal. A booklet accompanying the 
computer program cassette discusses 
each of the instructional deals. 

Let’s look at a couple of deals gen- 
erated by the pseudo random number 
routine and see how the computer 
defends while we play the N-S cards. In 
these examples the computer’s de- 
fensive play is that as of the time this 
column was written. 



BY THOMAS A. THROOP — 

The first deal to discuss is number 
92. The contract suggested by the TRS- 
80 computer program is 2 hearts, which 
is perfectly acceptable. Your cards and 
those of the dummy are as follows: 

NORTH 

(Dummy) 

♦ J64 

¥ T76 

4 AQJT 

4Q82 

SOUTH 

(Declarer) 

♦ A82 

¥ KQ543 

♦ K64 

4 95 

When the cards are originally dealt 
by the TRS-80 for this deal, the hands 
are reversed from that shown. How- 
ever, you have the option of reversing 
the North-South cards in order to have 
the more logical declarer be South. 
When the North-South cards are 
switched, the East- West cards are also 
switched to preserve the original rela- 
tionship of the four hands. In this deal 
South is the more logical declarer, 
having the five hearts versus three in 
the other hand. 

The TRS-80, as West, opens the 
king of spades against your 2 heart 
contract. You play the 4 from dummy, 
and East plays a higher spade, the ten, 
as a signal to West (assuming that the 
ten is not a singleton). The signal indi- 
cates the ace or queen of spades, a 
doubleton in that suit, or some other 
reason for West to continue that suit. 

On this deal it is proper to go after the 
enemy trumps right away, since you do 
not need to plan to ruff any losers in 
dummy first. Wishing to hold your 
trump losers to one trick, you should 
hope that East has the ace of hearts or 
that the jack of hearts is a doubleton. 

Suppose that you win the first trick 
with the ace of spades. What is your 
next play? You should lead a diamond 
to dummy’s ten and then lead a heart 
from dummy up to your KQ. On the 
heart lead East plays the ace, you play 
small, and West follows with the 8. 

Now, at trick 4, East leads the king 



of clubs, showing his AK holding as 
will become evident. You play the 5 
from South, West follows with the 3, 
you play the deuce from dummy. 
West’s play shows that he does not 
have a doubleton club, unless it is a 
doubleton jack. East now completes his 
high-low signal in spades by leading 
the 3 of spades to West’s indicated 
queen. West wins with the queen and 
then switches to the jack of clubs in 
order to trap dummy’s queen of clubs. 

Suppose that you now play the 8 of 
clubs from dummy. East plays the 4 
and you play the 9 from your hand. 
Next, West leads the 5 of spades to give 
East a ruff. East ruffs with the deuce of 
hearts. At trick 8, East leads the ace of 
clubs which you win with the 4 of 
trumps. The king of hearts draws the 
outstanding enemy trumps and the rest 
of the tricks are easily yours, as you 
make exactly 2 hearts. The computer’s 
defense was very strong, winning all of 
the tricks it possibly could. 



COMPUTER 


NORTH 

(Dummy) 

4 J64 
¥ T76 

♦ aqjt 

♦ Q82 


COMPUT1 


WEST 




EAST 


♦ KQ975 




4 T3 


¥ 98 




¥ AJ2 


♦ 983 




4 752 


4 JT3 


SOUTH 


4 AK764 



(Declarer) 

4 A82 
¥ KQ543 

♦ K64 

♦ 95 

W N E S 



Trick 1 


KS 


4S 


TS 


AS 


2 


3D 


TD 


2D 


4D 


3 


8H 


6H 


AH 


3H 


4 


3C 


2C 


KC 


5C 


5 


QS 


6S 


3S 


2S 


6 


JC 


8C 


4C 


9C 


7 


5S 


JS 


2H 


8S 


8 


TC 


QC 


AC 


4H 


9 


9H 


7H 


JH 


KH 


10 


8D 


QD 


5D 


KD 


11 


9D 


AD 


7D 


6D 


12 


7S 


TH 


6C 


5H 


13 


9S 


JD 


7C 


QH 






Continued on pg. 90 
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COMPUTER BRIDGE 



Contract: 2 hearts 

Tricks N-S: 8 Tricks E-W: 5 

The next deal is number 207. The 
contract suggested by the TRS-80 pro- 
gram is 3 no-trump, which is quite 
reasonable. Your cards and those of the 
dummy are as follows: 

NORTH 

(Dummy) 

♦ KT5 
¥ AJ95 
4 AJ4 
4 632 



SOUTH 

(Declarer) 

♦ A642 
¥64 

♦ KQ75 
4 A85 

The TRS-80, as West, opens the 4 of 
clubs against your 3 no-trump contract. 
You play the deuce from dummy, the 
TRS-80, as East, plays the queen, and 
you should play the 5 from your hand. 

4 CompuBridge® 0 

Contract Bridge Series 
Programs That Work 4 
Presently available for 
APPLE II 

(No special hardware needed) 

Elementary Course Cassette 
For 16K or 32K $19.95 

Complete Course Cassette 
For 16K or 32K $29.95 

Complete Course Diskette 
For48K $39.95 

Each course includes a series of pro- 
grammed lessons plus the unique 
QUIZMAKER which deals random 
hands for exercises on point count, 
opening bids, responses and rebids, 
then checks your answers and 
quizzes you or supplies the correct 
answer. The complete course in- 
cludes popular conventions such as 
Stayman and Jacoby Transfers. 

Available from your Apple Dealer or 
CompuBridge Division, Barclay 
Bridge, Port Chester, N.Y. 10573. 

Please send 

for 16K 32K 48K 

Check Enclosed or charge to 
VISA MC Card No. 

Name 

Address 



N.Y. Residents add Sales Tax 
CIRCLE 27 



East continues with the ten of clubs, 
which you should also duck. West fol- 
lows with the 7, and you play the 3 from 
dummy. East then leads the 9 of clubs, 
which you win with the ace. West fol- 
lowing with the jack. 

Now, how do you play this hand? 
You have two spades, one heart, four 
diamonds, and one club in top tricks. 
Your best chance for a ninth trick is to 
hope that West holds the ten and either 
the king or queen of hearts. Therefore, 
at trick 4 you should lead the 4 of hearts 
from your hand. West plays the 3, you 
should play the 9 from dummy as 
planned, and East wins with the queen. 

East returns the 7 of spades. Now 
you must be careful. If you plan on 
winning this trick in dummy with the 
king, you will create some problems. 
You will not have a good way to get to 
your hand to repeat the heart finesse. If 
you come to your hand immediately 
with the king or queen of diamonds, 
and the heart finesse loses and East 
elects to return another spade, you will 
have to win in your hand with the ace. 
After entering dummy with the ace of 
diamonds and cashing the ace of hearts, 
your only hope for two more diamond 
tricks will be that the diamonds were 
initially divided 3-3. Then, when you 
lead the jack of diamonds from dummy 
and overtake it with your remaining 
honor, your fourth diamond will be 
good. If you avoid these problems in 
the diamond suit by playing the ace, 
jack and a small diamond to your hand 
for the heart finesse, then you will have 
no entry to dummy to cash the ace of 
hearts if the heart finesse loses. 

Therefore, on East’s return of the 7 
of spades at trick 5 you should win with 
the ace in your hand. Now, at trick 6, 
you lead the 6 of hearts from your hand. 
West plays the 8 and you finesse with 
the jack in dummy, on which East plays 
the 5. Now you have your ninth trick. 

When you play out the rest of the 
deal, the TRS-80 computer program 
should defend carefully enough to 
prevent you from making an overtrick. 
When you have this cassette in the 
computer, why not play the deal for 
yourself and see how the computer 
program defends! 

The complete deal, the play of the 
cards described for the first six tricks, 
and one sequence of plays for the last 
seven tricks are: 



COMPUTER 

WEST 



♦Q 

¥ KT83 
♦ 9632 
4 KJ74 



NORTH 

(Dummy) 



♦ KT5 
¥ AJ92 

♦ AJ4 
4 632 

COMPUTER 

EAST 



SOUTH 

(Declarer) 

♦ A642 
¥ 64 

♦ KQ75 
4 A85 



♦ J9873 
¥ Q75 

♦ T8 
AQT9 





W 


N 


E 


S 


1 


4C 


2C 


QC 


5C 


2 


7C 


3C 


TC 


8C 


3 


JC 


6C 


9C 


AC 


4 


3H 


9H 


QH 


4H 


5 


QS 


5S 


7S 


AS 


6 


8H 


JH 


5H 


6H 


7 


2D 


AD 


8D 


5D 


8 


3D 


JD 


TD 


7D 


9 


6D 


4D 


3S 


KD 


10 


9D 


2H 


8S 


QD 


11 


KC 


KS 


9S 


2S 


12 


TH 


AH 


7H 


4S 


13 


KH 


TS 


JS 


6S 



Contract: 3 no-trump 
Tricks N-S: 9 Tricks E-W: 4 



The Texas Instruments 99/4 product 
is one which I am developing with 
Bobby Wolff of the Dallas Aces. 

The TI 99/4 program is a bidding 
program. As South, you select the bids 
with your cards while the computer 
provides the bids for your partner, 
North, and your East- West opponents. 
Each time it is your turn to bid you have 
three chances to come up with the best 
or recommended bid. If you do not 
select this bid in three choices, the 
computer program will tell you what is 
the preferred bid, as well as providing 
you with an explanation of this bid, 
bids by your partner, and bids by East- 
West. Also, explanations of certain 
bidding conventions may be displayed 
on request. This product will help 
improve your bidding. 

Next month I shall present some 
more examples of both the TRS-80 
playing program, including at least one 
deal played in the instructional mode, 
and the TI 99/4 bidding program. Also, 
I’ll report on some additional details for 
both of these products. 
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BOOKSHELF — 

Are You Computer Literate? 



Are You Computer Literate? , by Karen 
Billings and David Moursund; dilithi- 
um Press, P.O. Box 92, Forest Grove, 
OR 97116; 148 pp.; $6.95 paperback. 

Many leaders in the field of com- 
puter science advocate organized study 
of the capabilities, limitations and ap- 
plications of computers at least on an 
introductory level. Are You Computer 
Literate? by Karen Billings and David 
Moursund is designed to help you be- 
come more familiar with the ever- 
changing world of computers. 

Assuming you have no previous 
knowledge or experience with com- 
puters, the authors take a step-by-step 
approach to computer education. The 
book can be used as an aid to instruction 
in a classroom or as a self-instruction 
tool and is written clearly, allowing 
high school students as well as college 
professors to benefit from reading it. 

Particularly suited to self-instruc- 
tion, the book contains quizzes at the 
beginning of seven of its chapters and a 
final exam at the conclusion, allowing 
you to chart your progress and your 
knowledge. Other educational tools, 
fill-in-the-blank and matching exer- 
cises, test reading and retention skills. 

Although Billings and Moursund 
never claim to teach you everything 
about computers in one book, they try 
to provide background to at least head 
you in the right direction. They use 
familiar computer applications such as 
banking, retailing and law enforcement 
to illustrate the many ways computers 
are used in today’s society. They also 
prompt questions in the student’s mind 
such as how much control the govern- 
ment should have in the collection of 
data made easier by computers, who 
should have access to computer col- 
lected data and how this information 
should be used. 

“What is a Computer?’’, Chapter 2, 
discusses general functions a computer 
can perform: data processing, problem 
solving, executing programs and 
output of answers. The authors also 
deal with computer limitations, 
memory and speed. “A fast modem 
computer can do more arithmetic in one 
minute than a person using a pencil and 
paper could do in a lifetime. ” 

Evolution of the computer from the 



abacus through the present day com- 
puter is described, including the 
mechanical calculator, the Jacquard 
loom, analytical engine, relay comput- 
ers and the electronic digital computer. 
The U.S. Census of 1890 is also dis- 
cussed as an important step toward the 
development of punched data cards by 
Herman Hollerith, whose company is 
now part of IBM. 

Data entry and computer program- 
ming are discussed next. The authors 
define data as “information to be pro- 
cessed by a computer’’ and describe the 
many ways it can be input to a com- 
puter: key to tape, key to disk, mark 
sense readers, magnetic ink, optical 
character recognition, universal prod- 
uct code, voice input and sensing de- 
vices. A computer program is defined 
as “a detailed, step by step set of direc- 
tions telling a computer exactly how to 
solve a certain kind of problem. ’’ 

Requirements for smart machines 
are described in Chapter 5: “1) It must 
have some sort of measuring or sensing 
device in order to receive input from the 
outside world, 2) It must be able to use 
the data it receives, 3) It must be able to 
act upon the outside world.” The 
authors also provide two games in this 
chapter designed to teach the reader 
about robots. 

Chapter 6 examines mathematical 
modeling, computer simulation, in- 
formation retrieval, data processing 



and other examples of how computers 
are used in many different applications 
such as business and education. 

“As time goes on, computers will 
have a bigger and bigger impact upon 
people,” the authors said. “This is 
bound to occur, because computers are 
versatile and useful machines. They are 
getting cheaper. And people are gain- 
ing more knowledge on how to use 
computers.” The effect computers 
have on people is discussed in the con- 
text of the goods and services they pro- 
vide, the jobs they create as well as 
eliminate and the ways computers are 
used in education. 

Billings and Moursund deal with the 
question of what educational institu- 
tions should do to prepare students for 
life in a computerized society. “First, 
teachers need to understand how com- 
puters affect the subject matter they 
teach. They can then teach something 
about computers when it is an impor- 
tant part of their subject matter. ” Their 
second solution requires joint work by 
students and the schools. 

“The goal of this book is to increase 
your level of computer literacy. We 
want you to know more about what 
computers can do, and what they can- 
not do. We want you to be aware of the 
problems computers create for our edu- 
cational system, government, and 
you,” conclude the authors. 

— Reviewed by Elli Holman 
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WHAT’S COMING CP 



SOFTWARE 



Computer-Aided Scheduling 
for TRS-80 and Apple II 

Project Schedule Analysis/ 1 is a cassette-based introduc- 
tion to computer-aided scheduling for the TRS-80 Level II 
and Apple II computers with floating point Basic and at least 
16K of memory. PSA/1 uses critical-path scheduling tech- 
niques similar to those used by NASA for the U.S. space 
program. 

PSA/1 computes schedules for each job within a project; 
these schedules show how early each job can be started, how 
early it can be finished and the latest each job can be started 
and finished and still meet a project deadline. Schedules also 
show how long each job can be delayed without affecting 
other jobs. Once defined, projects can be named and then- 
data stored on tape for later analysis. Flexibility is enhanced 
by allowing you to specify any time unit (hours, days, weeks) 
desired for tracking the project. 

Schedule results are displayed on the video monitor, and 
printed reports can be produced if you have a line printer 
capable of printing 80 columns or more. Apple owners must 
provide their own printer driver routines at locations indi- 
cated in the software. 

The accompanying User Manual provides over 50 pages of 
information including how to define project networks, how 
to make time estimates and how to operate each of the six 
functions in the PSA/1 to such applications as building a 
house, planning a new product and preparing a gourmet 
dinner. 

The PSA/1 package consists of the program cassette and 
User Manual, and is available for $25 postpaid. Order should 
specify the TRS-80 or Apple II version. Washington resi- 
dents should add $1 .25 sales tax; Canadian orders should be 
paid in U.S. funds. For more information contact Express 
Marketing, P.O. Box 1736/BWC, Poulsbo, WA 98370; 
(206) 779-9508. Circle 103 



Elementary Math Package 

Compak, Inc., has announced a Mathematics Package 
(grades 1 to 8) for the 32K Apple II and TI 99/4 microcom- 
puters. 

The package is designed to support mathematics instruc- 
tion and improve student achievement. Some instructional 
materials can be used for review and practice while other 
materials are designed to introduce and develop mathemati- 
cal ideas. 

Ten major concepts are covered by the package and it 
includes over five hundred different self-contained modules. 
The concept areas include: Addition, Subtraction, Multipli- 
cation, Division, Common Fractions, Decimal Fractions, 
Percents, Measurements, Geometry and Elementary Alge- 
bra. 

Instruction is individualized so students can move at their 
own pace. Each concept area contains multiple levels that 



range from easy to difficult. As students progress within the 
program, they automatically branch to the appropriate level 
of difficulty based on their performance score. 

The Mathematics Package provides a student record- 
keeping feature which allows the teacher to keep track of 
student progress. At the end of a lesson, the screen displays 
the number of problems attempted, the number correct on the 
first try, the number missed, the percent correct and any 
promotions or demotions. This same information is also 
automatically recorded on the teacher’s “gradebook” disk. 
A special “gradebook” program enables the teacher to print 
names, add names, delete names, print scores and change 
scores. The printing of names and scores may be done indi- 
vidually or by class and on a printer if one is available. 

Unique features of the programs include: an escape func- 
tion which allows students to end the lesson and still retain 
their score; the capability to erase an answer before com- 
pleting it; the capability to enter answers in the same direc- 
tion as they are worked on paper (i.e. right to left for multi- 
plication), and the effective use of attractive color graphics 
and sound to provide immediate student reinforcement. 

The complete Mathematics Package contains ten instruc- 
tional disks and one recordkeeping disk in a binder with a 
teacher’s manual. The programs can be ordered by the com- 
plete package for $495; by all concepts for a single grade 
level (i.e. the disk for Grade 7 with all ten concepts) for $65; 
or by one concept for all grade levels (i.e. the concept 
Addition for all eight grades) for $50. A sample disk is 
available for $35 as is the Teacher’s Guide Manual for $20. 
For further information contact Compak, Inc., P.O. Box 
14852, Austin, TX 78761 ; (5 12) 452-1680. Circle No . 116 



Configurable Business System Features 
Transaction Processing 

Lifeboat Associates announced The Configurable Busi- 
ness System (CBS), a data management system that allows 
true transaction processing. Custom accounting systems for 
payables, receivables, inventory control, order entry and 
general ledger can be set up without using any programming 
languages. 

CBS defines an application such as an inventory control 
system by specifying master files to describe the inventory, 
customer and vendor files. Transaction files describe activ- 
ities such as purchases and sales. A data entry program enters 
information about customers, vendors, inventory, sales and 
purchases. After data entry is complete, an update program 
can process the transactions against the various master files, 
updating account balances and inventory quantities. 

The system features a comprehensive report generator 
which produces invoices, purchase orders, re-order reports, 
mailing labels or other special reports specific to the 
application. 

CBS requires a CP/M compatible system and at least 48K 
of memory. It does not require any support languages and is 
priced at $295. Documentation and a demonstration inven- 
tory system are supplied. For more information contact Life- 
boat Associates, 2248 Broadway, New York, NY 10024; 
(212)580-0082. Circle 129 
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WHAT’S COMING UP 



Integrated Business Application Software 

North Star Computers, Inc. has added integrated business 
application software packages to its product line. These new 
packages, designed for use with North Star’s Horizon com- 
puter system, include General Ledger, Accounts Receivable 
and Accounts Payable. 

Authorized North Star dealers can provide business 
customers with both hardware and integrated application 
software from the same source. A complete small business 
system including a Horizon computer with two quad-capacity 
drives and 64K RAM, CRT display terminal, letter-quality 
printer, NorthWord word processor. Mail Manager and Gen- 
eral Ledger application software would cost under $10,000. 

These business software packages are written with the 
first-time user in mind and are fully integrated. Each package 
can stand alone, or be used in combination with other pack- 
ages to perform an even greater variety of tasks. 

General Ledger package includes a financial reporting 
feature and is the cornerstone of the new business software. 
General Ledger is a complete program that allows you to 
maintain general ledger accounts based on inputs such as 
checks, bank deposits and journal entries. The financial 
reporting feature allows you to define dollar precision, use 
multiple columns, define sub- and grand- totaling and carry 
totals forward to other statements. General Ledger can be 
used in combination with NorthWord word processor to 
produce additional customized financial statements and re- 
ports. Accounting entries can be transferred from General 
Ledger to the other North Star business software packages, 
Accounts Receivable and Accounts Payable. 

The Accounts Receivable package allows you to establish 
and maintain up to 1500 customer accounts. It has features 
for retaining credit limits, year-to-date sales, last year’s 
sales, date and amount of last invoice and payment, and 
number of outstanding transactions for each account. It can 
be used as a stand-alone program or combined with General 
Ledger and Accounts Payable as a complete business ac- 
counting system. 

Accounts Payable allows you to establish and maintain up 
to 1500 vendor accounts, and includes flexible controls for 
printing checks, remittance notices and reports. Accounting 
distributions from Accounts Payable can be transferred 
automatically to General Ledger. 

Each application software package has been completely 
tested in actual business use and comes with professionally 
prepared instruction manuals. For further information con- 
tact your local North Star dealer or North Star Computers, 
1440 Fourth St., Berkeley, CA 94710; (415) 527-6950. 
Circle No. 123 



TRS-80 Programs for Retailers 

Two software packages for the TRS-80 Model I business 
computer system will assist effective management of small 
retail businesses. A Balance Forward Accounts Receivable 
program using reports modeled after manual pegboard sys- 
tems keeps track of transactions each month on account 
(on-line credit check of account is included for balance 



verification). A Retail Inventory Control program keeps 
track of inventory and sales information on each of 99 depart- 
ments. The Inventory program also retains last year’s data for 
comparison. 

System features for accounts receivable include: 1000 
accounts per disk (up to 8 disks), daily control sheets, state- 
ments printed on preprinted forms, automatic computation of 
service charge on selected accounts, various customer 
balance and credit reports and on-line - credit limit inquiry. 

Features of inventory control are: summary management 
report by department, sales analysis report, inventory on 
hand report, sales analysis by salesperson, tracks MTD and 
YTD sales, purchases, markdowns, initial markup percent 
and maintained markup percent by department number. 

These programs are fully documented and have been in 
operation for over a year. Accounts Receivable sells for $200 
and Inventory sells for $400. Both may be obtained for $500. 
For further information contact Data Processing Consultants, 
304 S. Dunlap, Paris, TN 38242; (901) 642-8627. 

Circle No. 127 



Apple II Textwriter 

Services Unique, Inc. announced the Disk Apple II Report 
Textwriter (Dart) software for the Apple II and Apple II Plus 
computers. Dart processing software was designed to sim- 
plify the creation of letters, reports and other output text 
utilizing disk files created by Edit. 

This text composition system allows free form file input 
without regard to either line or page length. Dart assembles 
text into physical lines and pages using pre-defined operator 
or file parameters. A special feature allows variable data to 
be key entered at report generation time utilizing standard 
text or form letter. File chaining allows an unlimited amount 
of input text. Other options include pagination, line justifica- 
tion, titles-subtitles, page numbering, line centering, margin 
setting and double spacing. 

Dart operates on an Apple II or Apple II Plus with a 
minimum of 32K memory, one disk unit and a printer. The 
textwriter supports a variety of printers including lower case 
as well as a CRT review. Optional lower case display is 
available with the appropriate adaptor. 

A user manual with documentation is provided. Price is 
$19.95 on diskette (+$1.25 shipping); a special package 
price for Dart and the text editor (Edit-IT) is $37.89. For more 
information contact Services Unique, Inc., 2441 Rolling 
View Dr. , Dayton, OH 4543 1 . Circle No. 160 



More Sargon II 

Sargon II is now available in both cassette and disk formats 
for TRS-80 Level II, Apple II (each $29.95); TRS-80 Level 
II Disk, Apple II Disk (each $34.95). 

In the future Sargon II will be available for Pet, Sorcerer, 
HeathKit, Ohio Scientific and CP/M. 

For more information contact Hayden Book Company, 
Inc., 50 Essex Street, Rochelle Park, NJ 07662. 

Circle No. 110 
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SAVE $$ APPLE® AND TRS-80® 



WHAT’S COMING UP 



Data Base Management System 
for Apple Computers 

A file management system for storing, classifying, 
manipulating and retrieving data in the Apple II microcom- 
puter has been announced by Rainbow Computing, Inc. 

Called Filemaster II, the system is comprised of four 
Applesoft programs: File Designer, a step-by-step, menu- 
driven guide for developing the structure of the information; 
Search & Retrieval, for entering data and retrieving records 
by logical AND, OR, NOR and NAND searching; Sort Infor- 
mation, providing the required input for use with the Single 
Disk Sort by Datacope; and File Converter, a process for 
converting old Filemaster I files into the new Filemaster II 
format. These programs are designed to allow you consider- 
able flexibility and control in the management of informa- 
tion, the company said. 

Special features include: computed numeric fields from 
user-entered formulas, totaling of numeric fields from rec- 
ords retrieved in a search, tallying of a given class of records 
in a file, provisions for creating a sub-file onto a second disk, 
retrieval of both active and non-active records and output 
formatting and printer control. Special input routines, menu- 
driven programs, error trapping, and both in-program and 
hard copy documentation allow even computer novices to 
manipulate data files. Requires 48K, Applesoft ROM and a 
disk drive (two drives are required for disk to disk transfers). 

Filemaster II is available for $99.50. For more information 
contact Rainbow Computing, Inc., Garden Plaza Shopping 
Center, 9719 Reseda Blvd., Northridge, CA 91324; (213) 
349-5560. Circle No. 139 



Master Accountant Business Software 

Computer Services announced Master Accountant Busi- 
ness System for CP/M compatible microcomputer systems. 

Master Accountant Payroll System allows a company to 
prepare its periodic payroll for hourly, salaried and com- 
missioned employees while accumulating the necessary in- 
formation for tax reporting. It generates the monthly, 
quarterly and annual returns to be filed with local, state and 
federal governments. It also prepares employees’ W-2s and 
maintains an up-to-date information reference for each 
employee. 

The Payroll System includes tables for federal withholding 
and FICA as well as withholdings for any of the fifty states 
and up to twenty localities from precomputed or user gener- 
ated tables. The system will automatically produce payroll 
checks. 

Each program contains a complete set of prompts and 
other helping messages that allow even an inexperienced 
operator to make full use of the system with minimal instruc- 
tional time. 

The Payroll System is designed to interface with the 
Master Accountant General Ledger System. This feature 
provides automatic monthly journal entries to the General 
Ledger. Also available to compliment the Payroll System are 
Accounts Receivable, Accounts Payable and General 
Ledger. 

CIRCLE 28 
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NEWDOS/80 

Powerful Disk Operating System for rhe TRS-80® designed for the sophisticated 
user ond professional programmer. 

NEWDOS/80 is nor meant to replace the present version of NEWDOS 2.1 which 
satisfies mosr users, but is o carefully planned upward enhancement. 

• New BASIC Commonds with vorioble record lengths up to 4095. 

• Mix or march drives 35, 40, 77, 80TK. 

• Security boot-up for BASIC or mochine code application programs. 

• Improved editing commonds. 

• Enhanced RENUMBER that allows relocation. 

• Device handling for routing to display ond printer simultaneously. 

• CDE function; striking of C, D, and E keys allows user to enter a mini-DOS. 



• Compatible with NEWDOS ond TRSDOS 2.3. 

• Superzap 3.0 ond 2.1 utilities. 



si 49 



NEW DOS FOR APPLE® "APEX" 

The complete APEX package with operating system, 
assembler, editor and user manuals. The package also includes * 
a complete set of utilities to maintain files on single or multiple 
drive systems. (Specify 5 inch Apple disk or 8 inch disk.) M M 



RELATED SOFTWARE 
XPLO *79 

FOCAL™ *59 



SAVE ON APPLE II 16K 

FREE MTI MEMORY UPGRADE KIT TO 48K 
WITH PURCHASE OF APPLE II 16K 
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TRS-80® SOFTWARE 

NEW DOS+ 35 frock *99 

AJA Business Program *289 

Disk Head Cleaner *18 

Disk Drive Alignment Program ..*109 
Dora Bose Program *99.95 

MOD I ”8" DISK SYSTEM 

• One SA800R DOS and Coble 

• Chassis ond Power Supply 

*1095 



16K RAM 
MEMORY KIT 



FACTORY 

CLEARANCE 



DISK DRIVE 
SALE! 

Complete with power suppy and 
chassis. 

TF-3 Shugart SA400 S349 

TF-1 Perrec FD200, 40 track .... $389 

TF-5MPI B51, 40 track S379 

TF-7 Micropolis, 77 track $595 

TDH-1 Dual sided, 35 track $495 

AAAX Disk 2: 1 0 Megabyte .... $4995 



Demo single or dual head MPI disk drive, 
complete with Power Supply ond Chassis. 
Full warranty. 

TF5D40TK S279 

TDH-1 D Dual 35 TK *419 

Limited Quantities 
7F-8 80 TK DISK DRIVE 

Double Your Capocity $639 

TF-9 DUAL 80 DISK DRIVE 
Quadruple You Copocity $799 

DISK DRIVE SYSTEM 

• 2 Shugarr SA400 
with power/chassis 

• Cable 

SPECIAL PRICE ONLY 



> Interface 32K 

► 1 35-Track DOS+ 

‘1179 



★ DARE DRIVES FOR ANY MICROCOMPUTER* 

PerTec FD200 $282 FD250 $359 

Shugort SA400 $279 5A800 $479 

MPID52 $349 B51 $279 

^Registered trade mark of Radio Shack and Apple 



OKIDATA PRINTER 

LIST $949 iJLAQ 
OUR PRICE *04y 




PRINTERS 




Mk 


‘1069 


ANADEX D8000 




‘925 


‘899 


700 




....‘1095 


‘1795 


702 




. ..‘1795 


‘2549 


ANADEX 9501 




....*1 599 








‘599 






/MICROCOMPUTER 

TECHNOLOGY 

INCORPORATED 



ASK FOR FREE 
CATALOGUE 



3304 W. MacArthur 
Santa Ana, CA 92704 
(714) 979-9923 



k Apparatlnc. 

4401 South Tamarac Parkway 
Denver, Co 80237 
(303) 741-1778 



Telex #678401TABIRIN 

ALL PRICES CASH DISCOUNTED • FREIGHT FOB FACTORY 
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All of the Master Accountant software is written in 
Microsoft Disk Basic and is available on 8" soft sector 
diskettes. Each package sells for $100; the manuals 
separately for your review are $25 each and a special demo 
package with manual is $50 each. For more information 
contact Computer Services, P.O. Box 2292, Hickory, NC 
28601; (704) 294-1616. CircleNo.137 



Business Data Base for TRS-80 

Charles Mann & Associates has announced a program- 
mable Business Data Base System for the TRS-80 computer. 
The system allows you to define and build data bases for 
inventory control, general ledger accounting, accounts re- 
ceivable and accounts payable. The fields may be manipulat- 
ed with the exclusive CMA math formula accumulator to 
format reports and present status displays. 

The system allows the filing of report formats for later use, 
and printing on most compatible printers. All data may be 
searched, sorted and displayed as needed. The system uses 
disk resident files and thus has a large capacity. The Data 
Base contains its own file catalog to make operation simple 
even for the non-computer user. 

Data Base is compatible with TRSDOS, NEWDOS and 3.0 
DOS. The programs are auto linked and called automatically 
as needed with full user driven menu control. The system needs 
32K of RAM (48K recommended) and a single disk drive. 
Multiple disk systems are fully supported under user control. 

The Business Data Base System is available from any of 
CMA’s 650 dealers worldwide for $89.95. Additional in- 
formation and dealer locations are available from Charles 
Mann & Associates, Consumer Products Division, 7594 San 
Remo Trail, Yucca Valley, CA 92284; (714) 365-9718. 
Circle No. 141 



Apple Plot Generates Charts and Graphics 

A software package enabling users of Apple personal 
computers to create, revise and print detailed charts and 
graphs was introduced by Apple Computer Inc. 

The program, Apple Plot, gives educators and business 
users plotting capability previously found only on more 
expensive minicomputers and calculator systems. 

When used with a color television monitor, Apple Plot 
helps you understand the information being plotted by 
displaying it in various colors. Hard copies of graphs and 
charts can be made automatically via an optional printer. 

Apple Plot gives you a choice of six graphic formats: line, 
multiline, bar, multibar, bar with line overlay and scatter- 
graph. Information can be entered manually, through the 
computer keyboard or from an external program such as 
VisiCalc or Desktop Plan. 

The program offers entry, edit and graph manipulation 
capabilities. It allows you to label axes and plots, automatic- 
ally changes the range scale and lets you change the graph 
parameters or expand selected graph areas when greater 
detail is required. 

Apple Plot will run on 48K Apple II Plus, on a 48K Apple 



What is..? 

BEYOND A SCOTT ADAMS’ 

ADVENTURE ? 



□DY55EY 



* 

* 

* 



ITEMS NOW HAVE 3-D-abi lity 
(Insides, Outsides, etc) 
MULTI-PLAYER - up to 12 
and they can be friend or foe 
UNRESTRICTED COMMANDS 
up to full paragraphs! 

COMING SOON... 
Bug Your Dealer ! 



INTERNATIONAL 

Bo* 3435 * Longwood. Fla 32750 
(305) 862 6917 



See Us at the National Small Computer 
Show, NY Coliseum, Oct. 30-Nov. 1 
CIRCLE 29 



QUALITY PROFESSIONAL & BUSINESS SOFTWARE 
FOR THE APPLE II AND APPLE PLUS COMPUTERS 



LETTER MASTER - This is a lightning fast Word 
Processor which is simple to use and operates like a character 
oriented system It features a menu driven operating system 
which allows entry, storage, editing, draft printing, and final 
justified printing Editing includes line corrections (add up to 
200 characters if you want), global search, string 
replacement, delete, add. and merge. Text floats as needed to 
make up lines of text Print justified, unjustified, or a mixture 
System prepares and prints form letters with its own 500 
name diskette full feature mailing list program. Applesoft II 
Disc Item M-34. $139 95. Processor without mailing list and 
form letter. Item M-33. $69 95 

PROGRAMMER PLUS - A 16 lesson course m Applesoft 
II on two full disks or super-load tape which will teach you all 
you need to know to program in BASIC. Lessons cover all 
string, math and logical operations necessary for personal, 
scientific or business applications. Special units teach 
graphics and sound to add a little Apple Class' to your 
programs. Applesoft II. Item 35 Tape. $24 95. Disc. $34.95 

SCIENTIST - A powerful scientific data base and statistics 
program which will turn your Apple into a mathematical and 
graphics tool It will do simple statistics or such complicated 
functions as Chi- Square. Normal. Student-t. and Poisson. 
With the Data Base element you can build your own analytical 
programs. Applesoft II Disc. $89 95 



Shipping $3 00 order CA residents add sales tax 

TO ORDER CALL TOLL FREE 24 HOURS 
800-854-0561 Ext. 802 
In CA 800-432-7257 

OR WRITE FOR TECHNICAL ASSISTANCE TO 

MONUMENT COMPUTER SERVICE 

Village Data Center - P.O. Box 603 
Joshua Tree. California 92252 
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GIVE YOUR APPLE 
A BYTE OF THIS. . . 

GPA ELECTRONICS’ 
Programmable, 
Intelligent I/O. 

More than a 
telecommunications 
I/O. More than an 
intelligent hard copy 
interface. GPA’s 
Intelligent I/O is a 
COMPLETE 
MICROCOMPUTER 
on a 4Vi "x7 " card! 

Completely programmable via Resident Monitor in 
PROM, the Intelligent I/O lets you 
select the operation you desire, 
then helps you complete the task. 

FEATURES: 

★ 6502 Microprocessor. 

★ 2K E-PROM; IK RAM as buffer. 

★ Serial and parallel I/O through four ports. Device can 
communicate with two peripherals simultaneously; 
RS-232 devices can communicate with parallel 
devices. 

★ Hard copy interfacing with either RS-232 or 20mA 
devices (Please specify.) 

★ Accommodates all baud rates to 9600. 

★ Selectable line feed, carriage return delay and char- 
acters per line. 

★ Supports standard EIA modem-control signals. 

★ Handshaking, of course. 

★ Functions as Data Channel, SPOOLER or Program- 
mable Filter. 

★ Remote access to Basic. 

★ Fully disk compatible. 

★ Will provide secure, encrypted telecommunications 
with optional programming. 

★ Complete dial-up and time sharing functions. 

★ Allows ganging of microcomputers for multi- 
processing. 

★ Accesses and controls servos, sensors, articulated 
devices or transducers (with appropriate firmware, 
available from GPA.) 

★ Functions as disk controller, resident assembler, 
E-PROM burner (with optional firmware.) 

★ Integral power supply (5VDC @ 350mA.) Completely 
portable, stand-alone computer. 

★ Fully documented, tested and guaranteed. 



See your dealer today, or order direct from GPA. 
Just S299.95 (110VAC ) or $320.95 (250VAC) 




lonviiic. v_> 

(707) 984 6270 



* Apple is a registered trade mark of Apple Computer. Inc. 
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II with an Applesoft II firmware card or on either machine 
with an Apple Language System. Also required are: an Apple 
Disk II with controller, a video monitor or television set and, 
for hard copy, a compatible printer with controller card. 

With purchase of Apple Plot, the user receives a write- 
protected Apple Plot diskette and an instruction manual. 
Apple Plot retails for $70. For more information contact 
Apple Computer, Inc., 10260 Bandley Dr., Cupertino, CA 
95014; (408) 998-1010. Circle No. 101 



Office Appointment Calendar Program 

Datebook manages time in a similar manner to the 
common office appointment book but with the speed and 
accuracy of a computer. It maintains a record of appoint- 
ments for up to three people (or three rooms) for an unlimited 
time in the future. Datebook is ideal for doctors, dentists, 
lawyers, salesmen, repairmen, or in any situation where time 
management is critical to office efficiency. 

Datebook was written for use by people with no computer 
background at all. It is easy to learn but still fast and efficient 
for an experienced professional, the company said. All 
operator entries are checked for validity as they are entered in 
order to eliminate errors. The appointment data is stored on 
disk and a condensed calendar is kept in memory for fast 
access to the limited information needed for searching for 
appointment openings. 

The operator works from a main option menu that appears 
at the bottom of a display of the day’s appointments. Menu 
items include: appointments, scheduling, cancelling, modi- 
fying and rescheduling; searching for all appointments for a 
specified person; scanning for openings that satisfy a set of 
arbitrary constraints; inspecting appointments for days in the 
future; and printing a day’s appointments. 

Appointment openings are found at computer speed elimi- 
nating the frustrating and time consuming chore of paging 
through a book searching for an opening to fit a client’s 
request, the company said. 

Datebook finds openings that fit time of day, day of week 
and day of year constraints. It eliminates the disadvantages of 
a paper appointment book. Appointments are modified or 
cancelled with only a few key strokes. Clean copies of a 
day’s appointments can be printed for each office worker or 
saved as a permanent record. 

Datebook was written in Pascal and is available to run on 
CP/M and its derivatives, as well as USCD Pascal systems. It 
is available for immediate delivery and is priced at $295. For 
more information contact Organic Software, 1492 Windsor 
Way, Livermore, CA 94550; (415) 455-4034. 

Circle No. 100 



Machine Language TRS-80 Game 

Poly sonic Breakout, from Savage Enterprises, has over 
100,000 different sound, speed and brick combinations. It 
includes seven different brick patterns, seven different game 
speeds, numerous sound variations and continuous keyboard 
scanning. 




98 Personal Computing October i seo 



t 



WHAT’S COMING CP 



Each brick pattern consists of four rows and you may 
change the pattern every game. As* you increase the speed of 
the ball the speed of the paddle is increased accordingly. 

Sound selection allows you to choose any of 343 different 
sound combinations so you can custom design sounds by 
touching a button. 

The paddle is operated on keyboard by the right and left 
arrow keys. It is on the bottom of the game instead of the side 
because the TRS-80 graphic set-up enables many more ball 
directions, the company said. 

Included are written instructions and explanations on the 
tape. Game is complete with speaker and connections for 
$15.95 (MN residents add 4% sales tax). For more informa- 
tion contact Savage Enterprises, P.O. Box 12, Brainerd, MN 
56401. Circle No. 106 



Real Estate Analyzer for Apple 

A software package for Apple computers takes the guess- 
work out of real estate investing for professionals and indi- 
viduals alike, Howard Software said. This package helps you 
make intelligent buy and sell decisions by computing the true 
net cash flows and annualized after-sale retum-on- 
investment for any property you define. 

The software allows you to view the direct impact of loan 
terms, tax bracket, depreciation schedule and holding 
period, as well as the separate inflation rates for rents, prop- 
erty values, expenses and taxes. 

All information is itemized in tabular form on the video 
screen or a line printer, year-by-year for the ten years after 
purchase. Use with a disk unit also allows you to file, retrieve 
and alter information on your properties. 

Real Estate Analyzer by Howardsoft is available on disk or 
tape for Apple computers with 48K and Applesoft at $49. 
Inquire at your dealer or contact Howard Software Services, 
7722 Hosford Ave., Los Angeles, CA 90045. 

Circle No. 109 



Mailing List Software 

CDS Corporation announced the release of Mail List for 
the Commodore CBM 16K and 32K computers with CBM 
2040 disk drives and CBM or ASCII printers. Mail List is a 
user-oriented program that prepares and organizes mailing 
list labels. 

Besides storing a large number (1,050) of records on a 
single disk, another feature of Mail List is that the length of 
all fields can be adjusted by you. Mailing labels can be 
printed out according to alphabetical or zip code order. 
Records can be identified and selected as active or inactive 
records and according to a user-designated utility field. 

The Mail List manual, which is over 30 pages, takes the 
novice (soon to be expert) through a step-by-step series of 
instructions. The price is $95 and Mail List is available from 
your computer dealer. For more information contact CDS 
Corporation, 695 East Tenth North, Logan, UT 84321; 
(801)753-6990. Circle No. 104 



DISK DRIVE WOES? PRINTER INTERACTION? 
MEMORY LOSS? ERRATIC OPERATION? 
DON'T BLAME THE SOFTWARE! 



&&( ' 

ISO-2 

Power Line Spikes, Surges & Hash could be the culprit! 
Floppies, printers, memory & processor often interact! 

Our unique ISOLATORS eliminate equipment interaction 
AND curb damaging Power Line Spikes, Surges and Hash. 

♦ISOLATOR (ISO-1 A) 3 filter isolated 3-prong sockets; 
integral Surge/Spike Suppression; 1875 W Maximum load, 

1 KW load any socket $56.95 

♦ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; 
(6 sockets total); integral Spike/Surge Suppression; 

1875 W Max load, 1 KW either bank $56.95 





•SUPER ISOLATOR (ISO-3), similar to ISO-1 A 

except double filtering & Suppression .... $85.95 

♦ISOLATOR (ISO-4), similar to ISO-1 A except 

unit has 6 individually filtered sockets .... $96.95 

♦ISOLATOR (ISO-5), similar to ISO-2 except 

unit has 3 socket banks, 9 sockets total . . . $79.95 

♦CIRCUIT BREAKER, any model (add-CB) Add $ 7.00 
*CKT BRKR/SWITCH/PILOT any model 

( CBS) Add $14.00 



PHONE ORDERS 1-617-655-1532 



L&J Electronic Specialists , Inc. 



171 South Main St., Dept. PC10, Natick. MA 01760 
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Then get your MICRO CONNECTION™ for only s 249 00 ! 
the micropenpheraf corporation 

PO. Box 529 Mercer Island WA 98040 wmmm 

m m VISA 

206 454 3303 HU 



GET MICRO CONNECTED Plugs directly between 
ALL S80’S (Level l,4K to MOD ll,64K) and the telephone net- 
work. To compliment the DIRECT CONNECT MODEM, a 
seperate RS-232 jack ALSO operates your serial printer on OR 
off line. With THE MICRO CONNECTION™ you have accurate 300 
baud two-way and simplex communications between you and 
the computer data base of your choice. In ADDITION, you have 
radio communications and extensive software options and 
packages. NO NEED for the expansion interface, acoustical 
coupling modem, RS-232 board or cableing. That is why THE 

MICRO CONNECTION™ IS A MODEM 

AND MUCH MORE. . .! 

Ask for our modem 
fact sheet. . . . 
COMPARE. . 
and. 
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PERIPHERALS 



Digitizer for the Apple II 

The DT- 1 1 A version of the Hi Pad digitizer provides a slot 
interface card for the Apple n, a floppy based software 




package, menu overlay and stylus. Functions supported by 
the software include Draw, Line, Area, Background, Pen 
Color, Separate, Catalog, Save, Load, Shape and so forth. A 
plastic overlay that serves as a menu allows you a selection of 
these functions and gives the user the opportunity to generate 
a wide variety of creative color graphics displays that may be 
manipulated. 

Besides the interface and software, the DT-1 1 A offers slot 
independence, Basic and Pascal compatibility, assembler 
driver code, user controls and optional cursor. The DT-1 1 A/ 
Apple D system requires a 48K system and the Applesoft 
Firmware Card. No magnetic biasing is required, nor does 
the DT-1 1 A suffer from extreme static sensitivity. 

As an entire package, including Hi Pad digitizer, inter- 
face, software, overlay and stylus, the Hi Pad DT-1 1 A is 
available for $795. For further details contact Houston 
Instrument, One Houston Square, Austin, TX 78753; (512) 
837-2820. Circle No. 140 



Pet Graphic Interface 

A high resolution graphic display board for new or old 
Commodore Pet computers that provides video mixing and 
ROM sockets was introduced by Micro Technology 
Unlimited. 




Personal 

Com putin g 



Personal 

Computing 



If you’re missing any of these 
have gaps in your data bank. 

Update your files with Personal Computing back issues. Past issues 
contain articles on computer basics and getting acquainted with your 
personal system, programs for business and home use, educational appli- 
cations, programming tips and suggestions on getting the most from your 
computer — plus much, much more. 

Just send $3 for each issue* of Personal Computing. Use the coupon 
below to place your order while our limited supply lasts. 

* Canada and Mexico, $4; all other foreign, $6. 



Send me these back issues of 

Personal Computing for $3 each: 



□ January /February 1977 

□ July/ August 1977 

□ September/October 1977 

□ November/December 1977 

□ January 1978 

□ April 1978 

□ October 1978 
[~~1 November 1978 



□ June 1979 

□ February 1980 

□ April 1980 

□ May 1980 

□ June 1980 

□ July 1980 

□ August 1980 

□ September 1980 



Issues not listed are out of print 



□ My check is enclosed, or charge to my □ Master Charge □ Visa 

Account No. 

Card Expiration Date 

Name 

Address 

City State Zip 

Mail to: Personal Computing 

1050 Commonwealth Ave. 
Boston, MA 02215 
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The MTU K- 1008-6 Pet Graphic Interface provides software 
selectable Pet video, graphic video or both. The expansion 
board features five ROM sockets that can be set at the same or 
different addresses. The system is automatically restored to 
the user selected configuration after power-up or reset. 

Mounted inside new or old Pet computers, the MTU K- 
1008-6 provides user control over a matrix of 64,000 dots 
(320 wide x 200 high). Serving as an 8K byte expansion 
memory when not used for graphics, the board also creates a 
KIM/MTU expansion bus supported by various MTU prod- 
ucts. On-board expansion allows use with optional light pen; 
K-1008-3C graphic software is also offered. 

The interface is priced at $320; K- 1007-2 connector board 
for old Pet at $35; K- 1007-3 connector board for new Pet at 
$59. Literature is available on request. For more information 
contact Micro Technology Unlimited, David B. Cox, 2806 
Hillsborough St., P.O. Box 12106, Raleigh, NC 27605; 
(919) 833-1458. Circle No. 126 



High-Resolution 

Portable Printer/Plotter Capability 

Computer Devices, Inc. announced a high-resolution 
Miniterm portable printer/plotter. Available for immediate 
delivery, the plotting feature is optional with Computer 
Devices’ Miniterm series of portable terminals and portable 
computers. 

Capable of plotting up to 3420 dots per square inch (60 
dots vertically by 57 dots horizontally) and achieving hori- 
zontal speeds of up to 24 inches per second between plotted 
points, the thermal matrix printer/plotter comes complete 
with CDI’s switch-selectable 80/132 column alphanumeric 
printer feature. Other features include microprocessor con- 
trol, a 45-character buffer, a full 96-character ASCII set of 
upper and lower case characters, and a patented print head 
control mechanism to provide long-life, quiet operation, 
extremely high reliability and applications flexibility, the 
company said. 

The printer/plotter option is priced at $425. Miniterms 
with the 80/132 plotter option range in price from $2410 for 
the Model 1203 KSR portable data terminal to $5910 for the 
Miniterm 1206 portable computer models that are either 
self-prompting or programmable. 

When using a portable Miniterm Model 1203 KSR, you can 
circumvent the delays inherent in time-sharing applications 
where graphic output is required. With the portable printer/ 
plotter, graphs can be printed on the portable, remote ter- 
minal instead of at a central time-sharing computer location. 



(Oifcc upon a time 

in the Land of Adventures, there was a King 
named Adams. King Adams said to himself, 

“My kingdom has Adventures for adults but 
what about my younger subjects?” So the 
mighty King went to his wise Knights of the 
C R Table with his plight. Lo and behold Sir 
Talley had the answer. Then the King asked, 

“But does it have sound effects, and graphics 
and can it be used by readers and non- 
readers alike?” KingTalley replied, “Oh yes 
Sire and even more, it has both a story mode 
and a quiz mode.” 

“So be it!” said the King, we will spread the 
news throughout the kingdom and call it . . . 

J© m 

9 “ “ Now available from your 

local Computer Lord 
or send for prices 
and additional 
info to: 




FOR 4-10 YEAR OLD ADVENTURERS 



DEALER 

INQUIRIES 

INVITED 



&gAd 

INT 



venture 



INTERNATIONAL 



Box 3435 
Longwood, Fla. 
32750 

(305) 862-6917 I 



©Copyright 1980 Adventure International 



See Us at the National Small Computer 
Show, NY Coliseum, Oct. 30-Nov. 1 
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The world’s most popular microcomputer, with 16K of 
memory and Level 11 basic for only $720, complete 
with full 90 day Radio Shack warranty. 

We accepy check, money order or phone orders with 
Visa or Master Charge. 

(Shipping costs added to charge orders). 

Disk drives, printers, periph- 
erals, software & games. . . 
you name it, we’ve got it 
(both Radio Shack & other 
brands). Write or call for 
our complete price list. 







ELECTRONICS MART, LTD. 



AUTHORIZED 

DEALERSHIP 



Radio /hack 



32 EAST MAIN • MILAN, MICHIGAN 48160 • (313) 439-1508 
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ST80 III T “ 

The Ultimate Communications Utility 



The Smart Terminal Communication Package 
from SBSG, Inc., can turn your TRS-80* 

Model I or Model II Microcomputer into a 
very intelligent distribution processor. Easy to 
use commands and a built-in HELP function 
insure successful operation even by the most 
inexperienced personnel. Full user control of all 
communication options insure that whatever 
your communication requirements, ST80 III™ 
can provide for them. We’ll get you there. 

ST80 III dan test your communication 
hardware^and notify you of hardware fault. 
ST80 III can transfer files from memory to 
other computers and process received 
information or store it on disk. ST80 III can 
support prompted or unattended modes of 
operation, or remote control from a host 
computer. ST80 1 1 Lean take full printer 
control. User definable control tables can be 
used to establish special control functions. User 
definable function keys can also be used. 




SMALL BUSINESS 
SYSTEMS GROUP 

6 Carlisle Road 
Westford. MA 01886 
(617) 692<3800 



SBSG, Inc., provides full user support and 
markets three other ST80 products. Any 
computer with communication capability can 
be accessed by ST80 I II "via your TRS-80* 

•TRS-80 is a registered trademark of Radio Shack, a division of Tandy Corp. 



Used with CDI’s Miniterm Model 1206 portable computer 
products, the graphics are a particularly key element in I/O 
applications such as instrumentation control, econometric 
modeling, financial and business trends plotting and wher- 
ever statistics, equations or tabular data are remotely col- 
lected or required. 

In its non-graphic mode, the thermal printer is a 5 x 7 dot 
matrix, friction feed printer that offers print speeds up to 50 
characters per second. The high-resolution, thermally created 
dots blend to create solid, clearly-readable charts and graphs 
because individual dots can be placed as close as 0.017 
inches apart. 

For further information contact Computer Devices, Inc., 
25 North Ave., Burlington, MA 01803; (617) 273-1550. In 
Europe, CDI is located at 108 Place des Miroirs, 9100 Evry, 
France; (6) 079 0077. Circle No. 115 



180 CPS Matrix Printer 

Pacific Mountain States Corp. has announced the avail- 
ability of a new 180 cps matrix printer that out-performs the 
TI-810 and Centronics 703/704 at a fraction of the price of 
those printers, the company said. The full-featured printer, 
the DS 180 by Datasouth, has a single unit price of $1395. 




The DS180 utilizes logic-seeking bidirectional printing at 
180 cps to achieve extremely high throughput. Under micro- 
processor control, the printhead automatically takes the 
shortest path to the next printable character and slews at high 
speed over blank spaces in the text. The standard 1000 
character buffer (optional 2000) and a choice of two hand- 
shaking protocols ensure optimum throughput on any CRT, 
business system or as a remote printer. Lab tests have shown 
the performance printing 40 column lines to be 198 1pm and 
at 10 columns 455 1pm, according to the company. 

The 94 ASCII character set is printed in a 9-high by 7- wide 
dot matrix. True lower case descenders and simultaneous 
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underlining are possible because of the 9-wire printhead. An 
adjustable head-to-platen gap accommodates forms up to 6 
parts in thickness. Fanfold perforated forms from 3 to 15 
inches may be fed through the front or bottom of the printer. 
An optional floor stand with basket is also available. The 
DS180 comes standard with three interfaces: RS-232, cur- 
rent loop and an 8-bit parallel Centronics compatible. 

The 38 programmable features of the DS180 may be 
configured from the control panel on the front of the printer 
or via the communications line. The LED indicators, digital 
display and custom keypad make format setup quick and 
simple, PMS said. A non-volatile memory retains the set- 
tings when power is turned off, eliminating the need to 
reconfigure the printer before its next use. 

In order to utilize the high performance characteristics of 
the DS 180 in CRT clusters, PMS offers an optional terminal 
multiplexer that allows up to four CRT’s to share one printer. 
This mux, priced at $295, permits only one CRT at a time to 
use the printer when using select switch cables. The unit is 
code transparent and can operate from 75 to 19,200 baud. 

For more information contact PMS, 63 19-B DeSoto Ave. , 
Woodland Hills, CA 91367; (213) 999-2281. 

Circle No. 134 



Bidirectional Dot Matrix Printer 

Matchless Systems has added a 132/80 column printer to 
its product line. The MS-204 is a bidirectional, 9 x 7 dot 
matrix printer that utilizes a print mechanism of simple 
design and high reliability, resulting in a superior perform- 
ance, the company said. It has a print head life of 100 million 
characters. 

Among the other features are a print speed of 1 25 cps and a 
through-put print speed of 63 1pm. The adjustable sprocket 
feed mechanism allows use of forms from 2.5" to 9.5" wide 
with loading from either the bottom or rear. A full 96 ASCII 
set permits printing upper and lower case characters which 
can be expanded for double width fonts in bold face. The 
VFU (Vertical Format Unit) provides pre-programmed/ 
programmable tab positions, top of form and bottom of form. 

The MS-204 offers the flexibility of 40, 66, 80 or 132 
characters per line, the company said. It’s compatible with 
TRS-80, Apple, Pet, Sorcerer or any other Centronics-type 
system. The $795 price includes complete documentation. 
For more information contact Bob Lahm, Matchless Sys- 
tems, Dept. 7, 18444 South Broadway, Gardena, CA 90248; 
(213)327-1010. Circle No. 150 



Data Acquisition with the Apple II 

American Multiplex Systems, Inc., has introduced a 
system of remote multiplexing components that may be con- 
trolled by an off-the-shelf Apple II microcomputer. The new 
miniMUX 800 series components make it easy for users to 
design and install their own data acquisition and control 
system. Both the user or installer can expect savings of over 
50% of the cost of conventional data acquisition and control 
systems, the company said. 






Word 

Processing 

Newsletter 



Want to really USE your computer? Then 
word processing is for you. Let your 
computer show you how much easier writing 
can be. 

Learn about the new 510 cps ‘non-daisy’ that 
at 10X daisy speed gives correspondence 
quality, at less than twice the cost. Too 
slow? The really fast guys are coming. How 
about 30 11x14 typeset-quality documents 
per minute? Maybe you could use the same 
‘printer’ as a copier. 

Read about all this and more in Low Cost 
Word Processing, the only newsletter about 
word processing using your personal 
computer. Just $15 for 12 issues. 



COMPUTER INFORMATION EXCHANGE 
Box 159 

. San Luis Rey CA 92068 . 
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■Save 10%-30%- 
on all your 
Computer Supplies! 

Whatever your computer needs, chances are, we have it - and at 
considerable savings. We carry a complete line of printer ribbons, 
disk packs, cartridges, paper and more. Compare our prices. A 
simple phone call gets you a quote. Call (212) 586-0923. 

r-MEMOREX diskettes 





10-40 


50-90 


100-190 


200-290 


300 + 


1-sided/single-density 


3.40 


3.25 


3.05 


2.95 


2.80 


2-sided/single-density 


5.80 


5.60 


5.20 


5.00 


4.80 


1 -sided/dual-density 


4.45 


4.30 


4.00 


3.85 


3.70 


2-sided/dual density 


‘5.80 


5.60 


5.20 


5.00 


4.80 


Minis (5-1/4") 


3.10 


3.00 


2.75 


2.65 


2.55 


Nobody manufactures a finer magnetic product 






than Memorex® Corporation. 
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10-40 


50-90 


100-190 


200-290 


300 + 


1-sided/slngle-density 


3.15 


3.05 


2.85 


2.75 


2.65 


2-sided/single-density 


4.55 


4.40 


4.15 


4.00 


3.85 


1-sided/dual-density 


3.70 


3.55 


3.35 


3.20 


3.10 


2-sided/dual density 


5.30 


5.10 


4.80 


4.60 


4.45 


Minis (5-1/4") 


3.10 


3.00 


2.75 


2.65 


2.55 



Opus® is our economy diskette. The price is lower, but there 
is no compromise on quality. All our diskettes are 
certified 100% error-free and come with an unconditional 
money-back or replacement guarantee! 

We carry flexible disks for all make systems: 

Ball Comp., COC, Data 100, DEC, Decision Data, Diablo, Four Phase. 
Hewlett-Packard, Honeywell, IBM, 3740, 3741, System 32, System 34 & 
5110, NCR, Pertec, Shugart, Sycor, Univac and many others. 

* Memorex is a registered trademark of Memorex® Corp. 

® Opus is a registerd trademark of Computer Resources Inc.® 



For immediate delivery or for a quote on any other product call... 




COMPUTER CORP 



( 212 ) 586-0923 

250 W. 57TH ST, 

NEW YORK. N.Y. 10107 
"The data and word processing 
discount warehouse” 



CIRCLE 38 

October i98o Personal Computing 103 






UNTIL NOW, 
this was the 
best your 
APPLE 
could do . . . 




By Sherwin Steffin and Steven Pederson 

This revolutionary program in spelling is as simple as it is effective. Unlike 
competing products which elegantly teach your computer to creatively mis- 
spell (two "s” '$), Compu-Spell uses only positive feedback to insure accurate 
learning. 

All displays show carefully selected spelling words in hi-resolution para- 
graphs. and ask the learner to replicate the correct spelling as the computer 
patiently monitors progress. An elaborate operating system supports use by 
many students in a classroom environment, while separate data diskettes 
make it affordable to individual home users. 

The main t 



(grade levels 4, 5, 6, 7, 8 and secretarial.) You choose a specific diskette or a 
coupon exchangeable for one once you have determined a suitable entry level. 
Compu-Spell requires a 48 K Apple, ROM-based Applesoft, and a disk drive. 
Main Program Disk and one data diskette 39.95 each 

Additional data diskettes (6 Available) 19.95 each 

Available at finer computer stores everywhere. CA res. add 6% sales tx Add SI 00 for 
shipping. 

EDU-WARE SERVICES, INC. (213) 346-6783 
22035 8urbank Blvd , Suite 223 • Woodland Hills, Ca. 91367 
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ASCII EXPRESS II 

By Bill Blue 



THE MOST COMPLETE COMMUNICATIONS PACKAGE 
FOR THE APPLE II AVAILABLE 

This professional terminal system includes: 

• Full upper/lower case support 

• Upload/download files to ANY type of 
online computer 

• Built-in line editor for files 

• Keyboard macros for efficient operation 

Recommended system requirements include a 48K 
APPLE II with disk, FP ROM or language card, and 
Micromodem or Comm. card. 

$59.95 plus 6% for Calif, residents 

Available from your local computer store or: 

soutnujesteRn data svstems 

P.O. BOX 582- P • SANTEE, CA 92071 

( 714 ) 562-3670 
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Three different terminals and a special Apple II interface 
board make the miniMUX 800 Series components well- 
suited to hundreds of applications: energy control of com- 
mercial and industrial facilities; remote site monitoring and/ 
or control; lighting control; remote video switch and camera 
control; liquid storage tank gauging systems monitoring and 
control; industrial facilities manufacturing equipment 
monitoring and control systems; security, fire and safety 
systems and many more. 

The miniMUX 800 Series terminals are completely self- 
contained ready to install. AMX caters to the do-it-yourselfer 
with their building block approach to data acquisition and 
control components, said the company. The miniMUX 800 
terminals will interface with computers using the RS-232-C 
interface unit. 




AMX is offering a limited number of introductory starter 
kits, which include an RS-232-C or Apple II interface unit, 
one miniMUX 801 input/output terminal with eight discrete 
inputs and seven discrete outputs, and one miniMUX 802 
analog terminal with one input channel of eight bits resolu- 
tion, and seven discrete outputs for the introductory price of 
$895. For more information contact American Multiplex 
Systems, Inc., 1148 E. Elm Ave., Fullerton, CA 92801; 
(714)870-5821. Circle No. 142 



Matrix Printer for Small Business Computers 

The Anacom-150 Serial Matrix Printer has been an- 
nounced by Anacom General Corp. 

The new unit prints its 9 x 9 dot matrix bidirectionally 
while logic seeking the quickest way to print the next line. It 
has a 136 column format but accepts tractor fed paper of any 
width. Line feed and top of form controls are at your finger- 
tips, the company said. Vertical format is programmable as 
are double width characters. Interfacing is accomplished by 
use of a personality board with parallel or serial interface 
supplied as required at no additional cost. 
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Anacom will market the printer nationally and interna- 
tionally through distributors. It is priced at $1350. For addi- 
tional information contact Dick Lombardi at Anacom 
General Corp., 1116 East Valencia Dr., Fullerton, CA 
92631; (714) 992-0223. Circle No. 114 



Two Interfaces for Videotaping 
Apple Color Graphics 

Ad war Video offers two interfaces for bridging the differ- 
ence between Apple computer graphics output standards and 
those of NTSC video recording and broadcasting equipment. 
While the Apple output works well with a dedicated color 
video monitor, it is incompatible with NTSC signal require- 
ments, ruling out the many advantages of videotaping or 
telecasting its color graphics. 

The simpler of the two devices, the Adwar Apple Proc Mod 
($250), is a circuit board inserted into the Apple plug-in slot #7. 
This brings the Apple output sufficiently close to NTSC video 
equipment tolerances to permit its direct videotaping. 

For more exacting applications, such as combining the 
Apple color graphics output, through a time-base corrector, 
with other video signals through a switcher, the more sophis- 
ticated Adwar Apple Graphics Interface is required. This 
more expensive device ($4690) stores an entire non-standard 
Apple video frame in solid state memory. It then reads out 
from that memory at standard NTSC rates required for multi- 
source tape editing, special effects and telecasting on the air. 
According to the company, at the time of this writing, the 
product is scheduled to be available in September. 

The Adwar Apple Graphics Interface requires all six house 
system drives, including sync and subcarrier, locking the 
outgoing signal to those drives. For more information contact 
Adwar Video, 100 Fifth Ave., New York, NY 1001 1; (212) 
691-0976. Circle No. 132 



Correction 

A product announcement by M & R Enterprises, published 
in the August PC , on an Upper/Lower Case Board for Apple 
II, contained the wrong address for the company. 

The correct address for M & R Enterprises is P.O. Box 
61011, Sunnyvale, CA 94088. 

Personal Computing apologizes for any inconvenience 
this error may have caused. Circle No. 145 
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YOU CAN BUY. 



NONPROFIT 
PEOPLE'S SOFTWARE 



Up to 77 high-quality programs 
for TRS-80, only $10.95 



LEVEL II TAPES: 



‘Tiny’ Pascal runs on any 16K Level II system, includes the 
programming structuring capabilities of full Pascal, but not 
data structuring. 



Able to compile Z-80 machine code, programs run about 
five-times faster than Level II Basic— graphics run eight- 
times faster! Requires use of T-Bug and Edit-Assembler. 

Tape 3, People’s Pascal I $19.95 

Tape 6P PASPATCH allows old Pascal II (no longer 
available) to use printer, floppy disk $15.00 



Tape 1, 34 business, educational, game programs $10.95 
Tape 2, 77 programs from Osborne book: ‘Some Com- 
mon Basic Programs’ $10.95 

Tape 5, 24 business, educational, game programs $10.95 
Tape 7, 31 business, educational, game programs $10.95 
Tape 8, about 30, including 1,700-baud tape loader $10.95 



Overseas, add $1us per tape for postage 
California residents add 6 pet. tax. Dealer inquiries invited 



COMPUTER INFORMATION EXCHANGE 
Box 159 

San Luis Rey CA 92068 
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Turn your daydreams and visions of the 
future into cash. We're looking for short 
(500 to 2000 words) science fiction stories 
dealing with the future of microcomputers - 
their possible uses and their roles in society 
and in people's lives. Stories must be ori- 
ginal and not published elsewhere. Submit 
your typed, double-spaced manuscript to 
Personal Computing, 1050 Commonwealth 
Ave., Boston, MA 02215. 
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THE 

MID=HTLHNTIC 
- COMPUTER - 
S HOW 

WASHINGTON, D.C. 

D.C. ARMORY/STARPLEX 
THURSDAY-SUNDAY 
SEPTEMBER 18-21 

11 A.M. TO 9 P.M. THURS.-SAT. 
11 A.M. TO 5 P.M. SUN. 



The new computers are showing off. 

Over $50 million worth of equipment in over 100,000 
square feet of space, including the latest software and hard- 
ware for business, government, home and personal use. Every- 
thing the NCC show has and more will be on display, and you can 
buy it all right on the spot. 

Computers costing $150 to $250,000, mini and micro com- 
puters, data- and word-processing equipment, telecommunica- 
tions, office machines, peripheral equipment and services from 
leading names in the industry like IBM, Xerox, Radio Shack 
and Apple will all be there. 

There’ll be conferences on business uses of small to 
medium sized computers, and howto make purchasing 
evaluations. 

There’ll be robots, computerized video games, 
computer art and computer music. 

Everyone from kids to people who earn their liv- 
ing with computers will have a great time at the larg- 
est computer show ever organized in each region. 
Admission for adults is $5. The public is 
invited, and no pre-registration is necessary. 
Don’t miss the computer show that 
mixes business with pleasure. Show 
up for the show. 



CHICAGO 

McCORMICK PLACE 
THURSDAY-SUNDAY 
OCTOBER 16-19 

11 A.M. TO 9 RM. THURS.-SAT. 
11 A.M. TO 5 P.M. SUN. 



Produced by National Computer Shows, 
824 Boylston Street, Chestnut Hill, MA 02167. 
Telephone (61 7) 739-2000. 



is? EL 

NORTHEAST 
COMPUTER 
SHOW 

BOSTON 

HYNES AUDITORIUM 
PRUDENTIAL CENTER 
THURSDAY-SUNDAY 
NOVEMBER 20-23 

11 A.M. TO 9 P.M. THURS.-SAT. 
11 A.M. TO 5 P.M. SUN. 



Please send me: 



THE 

NRTiGNHL 

COMPUTER 

SHOWS 

HAVE WE 
GO! A PROGRAM 
FORYOH! 



□ adult tickets at $5 each. I have enclosed the proper amount of $ 

□ Information on the show’s conference program. 

□ Hotel registration information □ Exhibitor rental information 

Please print: Name 

Address 

City State Zip 



in* 
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SYSTEMS 



Price Reduction 
On Floppy Disk Systems 

Altos Computer Systems announced 
a price reduction averaging 10 percent 
on its single-user floppy disk systems 
utilizing single or dual floppy drives. 

The reduction positions the Altos 
systems within the price performance 
range of smaller floppy disk based sys- 
tems costing from $3500 to $4500, the 
company said. The systems feature 
Shugart floppy disk drives, fully sock- 
eted single board computers with Z80A 
processors, and communications 
capabilities including asynchronous, 
bisynchronous and networking. All 
systems are available for immediate 
delivery. For more information contact 
Altos Computer Systems, 2360 Bering 
Dr., San Jose, CA 95131. 

Circle No. 146 



New Single Board Computer 

Vector Graphics Inc. , has introduced a 
new single board computer. Designed 
to function as the center of an approach 
to system design, the new ZCB single 
board computer generates all standard 
S-100 bus signals, including emulation of 
an 8080 CPU, and contains a Z80-A 
operating at 4 MHz, IK of high-speed 
static RAM memory, 3 sockets for up to 
12K of PROM, one serial port and three 
8-bit programmable parallel ports. 

According to Vector, circuitry is 
provided to support static or dynamic 
memories. Use of 2708, 2716 or 2732 
PROMs is jumper selectable and the 
addressing of the PROM and RAM is 
completely variable. Use of wait states 
on bus cycle and/or instruction fetch 
cycle is also jumper selected. 

The serial port makes use of the Intel 
8251 USART, which enables software 
to control the format of the transmitted 
data and to vary the mode of trans- 
mission. A dip-switch is used to specify 
the basic rate between 110 and 9600 
baud. The parallel ports use the Intel 
8255 which allows the same lines to be 
used for input and output under pro- 
gram control, and allows a great deal of 
flexibility in the assigning of lines to 



I/O addresses, also under program con- 
trol, said the company. 

The use of the ZCB single board 
computer in Vector’s own computers 
enables efficient development of spe- 
cial-purpose systems. For process- 
control or instrumentation problems, a 
designer can compose and test new 
software and interface-hardware entire- 
ly within the full-strength computer 
system, connected directly to the pro- 
cess being controlled, said the com- 
pany. Vector’s variety of I/O boards, 
supplemented by dozens of S-100 I/O 
boards from other vendors, can be 
inserted directly in the full system. 
When testing is complete, the target 
software and hardware, centering 
around the ZCB single board computer, 
is then moved to its final chassis with 
no downloading or in-circuit-emulation 
required. 

The ZCB single board computer has 
a suggested retail price of $395. 
Immediate delivery is available from 
off the shelf inventory. For further in- 
formation contact Carole Ely or Robert 
Harp at Vector Graphic, Inc., 31364 
Via Colinas, Westlake Village, CA 
91361; (213) 991-2302. 

Circle No. 153 



Intelligence Provided 
By Single Board Microcomputer 

A single board microcomputer, the 
M-80, which has a Z-80 CPU, sockets 
for 2K/4K of PROM, 2. IK of RAM, 16 
highly flexible I/O lines and a system 
clock, has been introduced by Miller 
Technology. The board also provides a 
breadboard area and 12 decoded address 
strobes for easy user customizing, the 
company said. 

The 4.5 inch by 6.5 inch board was 
designed for test equipment, smart pe- 
ripheral controllers and dedicated con- 
trol and processing applications. The 
board may be mounted in a card cage or 
by standoffs. 

Two software packages are currently 
available. A monitor contained in a 
single ROM enables you to dump or 
enter data into memory, set break- 
points, control I/O lines or download 
programs from another computer. An 
integer Basic provides 30 functions and 
commands, and permits calling machine 
language routines. Both monitor and 




Black & white and-or COLOR 
PURCHASE-LEASE or TRADE 



COMPUTER 
r - PORTRAIT 
SUPPLIES 

Plus coming soon 

NEW 

COMPUTER 
AMUSEMENT 
DEVICES 

All controlled by one or several computers 

COMPUTER 
BUSINESS 
SYSTEMS 

The Professionals of the Creative Computer Industry 








CYGNUS COMPUTER PORTRAIT SYSTEMS 
International Sales Office 
3701 North Ravenswood 
Chicago, Illinois 60613 

CALL TOLL FREE 

1 - 800 - 621-1258 

IN ILLINOIS CALL 312 248-1425 



See Us at the National Small 
Computer Show, NY Coliseum, 
Oct. 30-Nov. 1 Booths 4506 & 4508 
CIRCLE 42 



HOME VISITOR 

SOUTHERN CAL MICHIGAN 



17 



12 3 4 
QUARTER 



m 



BALL ON SOUTHERN CAL 3fl tire 
1 DOWN ID YARDS TO GO 1H43 



OFFENSE PASSES DEEP **DEFENSE 
IS A 3-4 PLAY GAINS Ifl YARDS 
\**FIRST DOWN SOUTHERN CAL 
v^DEFENSE? 



FOOTBALL/80 

Play college football with your computer. 
Match your offensive and definsive play c alling 
abilities with FOOTBALL 80. 

• 1 1 Offensive plays to choose from 

• 5 Defensive strategies to use 

• Graphics scoreboard 

• Narrative of each play 

• Play result computations are based on a com- 
bination of offensive and defensive strategies 



BASEBALL/80 

When the season changes switch to baseball. 
Challenge your computer to a complete game, 
matc hing your pitching and hitting strategies 
with BASEBALL 80. 

• Graphics scoreboard updated each pitc h 

• Narrative of the results of each pitch 

• In the field you call the pilches 

• At the plate you set batting strategy 
16k Level II 
BO TH games on 
one tape 

CREATIVE DEV ELOPMENTS 



$995 






P.O. BOX 81057 
Memphis. I N 88181 
Phone 901 882-1909 
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EDUCATIONAL 

SOFTWARE 

TRS-80* 

80+ Programs in; 



ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

FOREIGN LANG. 

GAMES 



MATH 
BIOLOGY 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
FARM RECORDS 



Programs are grouped Into packages of | 
4 to 7 programs priced at $14.95 per | 
package Including shipping and han- 
dling. Available on disk or tape. 

Write for catalog! 

MICRO LEARNINGWARE, BOX 2134, 
MANKATO MN 56001, 507-625-2205 

"TRS-80 is a registered trademark of TANDY CORP." 
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M G. Kelly 

&6 Associates, Inc. 

LASER 7 

AnTinu Printers. Interfacings 

Consultations 

PRINTER Retail Price: $719.00 

Wholesale Distributors Welcome 



Do you think lasers are the thing of the future? The future is 
here now with a new light weight, innovative printer. LAP- 
32, Laser Action Printer, incorporates a laser diode instead of 
the conventional impact or thermal systems. 

Standard Features and 
Programmable Options 

♦Switch Selectable-RS232C, Current Loop, 

And Parallel I/F 

♦Parallel I/F Compatable With Centronics, 

And Data Products 

♦Software Control Printer Select-Deselect. Graphics 
Mode Enable-Disable 

♦Variable Paper Widths From 3-1/2-14 Inches 

♦ 132 Columns Printing Bidirectionally 

♦ 132 Characters Per Second 

♦300-1200 Baud 7 Bit ASCII With RS232C I/F 
*96 Upper-Lower Case Characters 
♦Combination Tractor-Roller Paper Feed 
If you are interested in more information or wishing to 
purchase the LAP-32 Printer, please contact your nearest 
Sales Representative. 

4744-B.N.E. 28th Street 

Fort Worth, TX 761 1 7 (81 7) 534-5932 



Now you can afford quality! 




Scotch’ 

DISKETTES 



SAVE 30% TO 45%! 



Possibly the LOWEST prices you'll find 
on quality SCOTCH Brand Diskettes in 
sizes to fit all Mini/Micro Computers. 
One box or by the case, all orders are 
processed quickly and shipped per 
your instructions. 

Call COLLECT to Order! 



(805)484-8146 

QUALITY DATA SUPPLY 

P.O. Box 236, Camarillo, CA 93010 

Authorized Distributor 
Information Processing Products 
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DUAL-BAUD HFSPEED CASSETTE S80 
PROGRAMS 

Faster Load & Save of Data Files without mods 

Optional Speed Change during program available 

Accommodates popular clock Speed-Up mod, which 
Loads & Saves Data and Programs in near half the time 
normally. 

Accommodates popular external Hl-Speed Loader and 
may be used with Clock Speed mod for near Disc speed 
Loading & Saving programs and data. A 6k program loads in 
a few seconds. 

Auto re-use of blank deleted data file lines 

Tape progress display for Data Loads & Saves 

Keyboard Logic Gating measures length of file information 
each line being inputted 

File size displayed at start of Data Load, with option to 
boot oversized file and start a new file. 

Data File Programs 16K Level 2 $10. Cassette 

Dual-Baud Format provides for use of Gregory Electronics 
Clock Speed-Up optionally. 

Hi-Speed Format uses JPC Products TC-8 external Fast 
Loader and optional use of the Clock mod. 

Dual-Baud Home Expense Journal 
Hi-Speed Home Expense Journal 
Dual-Baud Home Mail & Telephone File 
Hi-Speed Home Mail & Telephone File 
J/C ENTERPRISES 

Box 441 186 Miami, FL 33 144 
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THE LOWEST 

prices on this high-quality software. Buy direct and save 50%. 
Now. also available for CBASIC on CP/M and MBASIC on 
HEATH HDOS 

DATA BASE MANAGER Mod-1 $69 Mod II $199 

You can use it to maintain a data base & produce reports 
without any user programming. Define file parameters & report 
formats on-line. Key random access, fast multi-key sort, field 
arith , label, audit log. No time-consuming overlays. 500 happy 
users in a year. Mod-ll version with over 50 enhancements. 

A/R Mod-1 S69 Mod-ll $149 

Invoices, statements, aging, sales analysis, credit checking, 
form input, order entry. As opposed to most other A/R. ours 
can be used by doctors, store managers, etc. 

WORD PROCESSOR Mod-1 $49 Mod-ll $49 

Center, justification, page numbering .. Used for letters, 
manuals, and reports. Mod-1 version features upper/lower 
case without hardware change! 

MAILING LIST Mod I $59 Mod-ll $99 

The best! Compare and be selective. Form input. 5-digit 
selection code, zip code ext., sort any field, multiple labels. 
Who else offers a report writer? 

INVENTORY Mod-1 $99 Mod-ll $149 

Fast, key random access. Reports include order info, 
performance summary, E.O.Q., and user-specified reports. 
Many converted their inventory to ours! 

PAYROLL A/R. A/P. and GL available for the Mod-ll DOS and 
CP/M. 

L21B. a cassette package of 10 business programs for Level II 
16K systems. $59 

MICRO ARCHITECT, INC. 

96 Dothan St., Arlington, MA 02174 
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Applell 

SOFTWARE 

ACCESSORIES 

SUPPLIES 

ULTRACURRENT 



TO ORDER 

send $3.00 
You receive current 
BUYERS GUIDE 
and a certificate 
worth $3.00 off of 
your first purchase. 



MlfiSfi 2513 N * Sheridan Rd - 

■IVliClw Peoria, Illinois 61604 
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GENEALOGY — Compiling Roots 
and Branches 

an extensive family tree system 
for the Radio Shack TRS-80 * 64K 1 -disk Model II 

stores and reviews 1000 family members’ 

names, dates, places, marital statuses (2), rela- 
tionships (father, mother, spouses (2), children 
(16)), and footnotes (2) 

outputs complete Family Books of info for your- 
self and others, new and revised pages for Family 
Book recipients, indices to names and their ID 
numbers, indented format 8-generation pedigree 
and descendent charts, lists of dates and footnotes, 
and blank and filled-in forms to solicit info 
includes comprehensive indexed 70+ page 
manual *TRS-80-Trademark Tandy Corp. 

diskette with manual $250. 00 

manual & 9-program 

8 IK BASIC listings $50 00* 

manual alone $25.00* 

‘applicable toward diskette purchase 
brief description with 

example printouts $1.00 

send check or money order or call for more details 

John J . Armstrong (205) 342-7642 
3700 Whispering Pine Road #47B 
Mobile, AL 36608 

from the original author of Roots and Branches 
Personal Computing magazine September 1979 
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TRS-80 & OTHER NEEDS FILLED FOR LESS 

+ + + Compatible disk drives with power supply and 
case — 120 day warranty+ + + 

* 40 track (204,800 byte/disk) use both sides, anti- 

crimp/power protect $329 

* 8 in. drive & P.S./case $749 with P.S./case for 3 

drives $929 

*80 track (204.8Kbyte) 90 day warranty $479 

* 4-drive cable $28 ** 10 disks-5-in. @ $24-8 in. @ 
$36-hard case $3&S5 

*•• Base 2 pnntcr-(60 line/min. 73.80.96,120 or 132 
char, line 

Bi-direct dot matrix impact 96 char ASCII. IS baud 
rates) $499 

2K buffer, graphics, & tractor option avail.*** 

* Centronics 737 $839+ + cable (& $25 

* Harris selectric (word processing-typewriter & 
printer) $790 

* Lower case foe Centronics 779/Radio Shack line 
printer I -easy install $99.95 

* UPS (uninterruptible power supply) prevent power 
drop surge or out? From $195 

* Cat modem (orig/ans) $ 144 + + 16K memory set (200 
nano $44 

* Apple. Atari, Radio Shack model 1/2 hardware/ 
software discounted 

A/R, A/P, G/L, P/R for $360 or $100 ea (model 1) & 

$630 or $165 e. (model 2). 

Applications interact & are complete & professional 
Will run on other computer. This is a special intro- 
ductory price. 

* Ask for free flyer with our low prices — dealer 
inquiries invited Mass, residents add 5% tax-F.O.B. 
Tewksbury — freight extra. 

M/C. Visa or check accepted. TKS-80 u a reg. trade 
mark of Tandy Corp. 

OMNITEK SYSTEMS 

24 Marcia Jean Dr., Dept. K, Tewksbury, MA 01876 
Call 617-851-3156 
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PROGRAM COPYRIGHTS FOR YOU 

Are you giving away valuable programs you cre- 
ated, because you thought Copyrights were expen- 
sive and available only to the elite? 

Allow us to show you how easy it can be to obtain 
Copyrights for $ 10, to protect your valued programs. 

This offer is no gimmick. The information sup- 
plied guarantees to avoid red tape and has been 
compiled from our personal experience while recent- 
ly obtaining many Copyrights. 

We provide all necessary instructions and applica- 
tion examples to obtain Copyright for your deserving 
programs. 

Yes! Your program can utilize techniques already 
in public use, we explain what you must add to it for 
successful Copyright. 

Send your $10 check today! 

***** 

Ole’ Jim’s S-80 Software 
Graphic Math Review and Triangle Solutions 
Security Audit for Inventory 
Radio Amateur’s Qsl File 
Hi-Speed Graphics Craps 
Send for free descriptive program brochure 

J-C ENTERPRISES 

BOX 441186 MIAMA, FL 33144 
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WHY PAY CUSTOM PRICES??? 

SMALL QUANTITY 

STOCK CONTINUOUS 



FORMS 



• CHECKS 
• INVOICES 
•STATEMENTS 
• SPEED-O-GRAMS 
•BILLS OF LADING 
• PURCHASE ORDERS 
IMPRINTING A VAILABLE 

STOCK PRINTOUT PAPER 
STOCK CONTINUOUS LABELS 

Call or Write for Prices & Samples 

Discount data foams, iNc. 

407 EISEDHOUJER LRDE SOUTH 
LOfTlBflRD, ILLIDOIS 60148 
(312) 629-6850 
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SAVE MORE THAN 20% 

NORTH STAR — INTERTUBE — MICROTEK 
ZENITH — RCA — COS MAC — ITHACA 
THINKER TOYS — GOD BOUT — SUPERBRAIN 
THE SMARTEST COMPUTERS AT THE SMARTEST PRICE 



HORIZON- 1 -32K-DOUBLE DEN ASSM & TESTED 


$1994 


HORIZON-2-32K-DOUBLE DEN ASSM & TESTED 


2299 


2 NORTH STAR SOFTWARE DISKS w/HORIZON 


FREE 


NORTHWORD 


S 299 


MAILMAN ACER 


239 


INFOMANAGER 


369 


GENERALEDGER 


799 


HRZ-64Q+ HARDDISK 


7199 


HRZ-2-32K-Q ASM 


2699 


NS HARD DISK 18M 


3939 


NS PASCAL ON DISK 


190 


NORTH STAR BASIC 


FREE 


COLOR!! 


PHONE 


ITHACA COMPUTER 


2695 


ITHACA RAM 64K 


845 


8086 CPU 16 BIT 


556 


SSMZ80CPU KIT 


221 


MEAS 64K RAM ASM. 


599 


SSM VIDEO BRDVB3 


412 


GODBOUT 16KSTAT 


285 


SUPERRAM 32K 


580 


DISC US/ 2D + CP/M 


975 


SUPERRAM 16K 


290 


2D ADD DRIVE 


650 


2+2 ADD DRIVE 


975 


TARBELL CONTROLLER 


295 


DISCUS/2+2 


1259 


INTERTUBE II 


725 


HARD DISK 26 Mb 


3995 


SUPERB RAIN 


2395 


SUPERBRAIN QUAD 


2995 


ZENITH Z-19AAT 


739 


ZENITH H-ll 


2995 


HEATH Z-8948K 


2495 


MICROTEK PRINTER 


675 


AN ADEX 9500-1 


1389 


AN ADEX 8000 


865 


NEC PRINTER 


2799 


SECRETARY WORD PRO 77 


TEXTWRITER III 


112 


GOFAST SPEEDBASIC 


71 


PDS Z-80 ASSEMBLER 


89 


NS BASIC COMPILER 


77 


EZ-80 Z-80 TUTOR 


25 


EZ-CODE IN ENGLISH 


71 


ECOSOFT ACCOUNTING 


315 


WORDSTAR 


325 


BOX OF DISKETTES 


29 


BASIC DEBUGGER 


89 



Which Computers are BEST? BROCHURE FREE 

ORDER 2 or more COMPUTERS . . BIGGER DISCOUNTS 
WE WILL BEAT OUR COMPETITION S PRICE 
FACTORY ASSEMBLED & FACTORY WARRANTY 

AMERICAN SQUARE COMPUTERS 
KIVETT DR. * JAMESTOWN, NC 27282 
919-889-4577 
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For Apple— TRS-80— Super Brain™ 
and others using 4116 

RAM RIOT! 




Guaranteed 200ns /55°c RAM 



1-5 sets 


49.95 each 


6-10 


44.95 each 


11 and up 


39.95 each 



Berliner Computer Center 

102 Jericho Tpke., 

New Hyde Park, NY 11 040 
(516) 775-4700 

Add $2.50 shipping/handling charges. No 
C.O.D.’s N.Y.S. residents add applicable sales 
tax. Check or money orders only. 
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META-TREK 

This is NOT your average star-trek 
game! Meta-Trek requires 32Kandone 
disk drive, and features several never- 
before-incorporated missions! You’ll 
be dodging black holes and meteor 
storms, contemplating time warps 
and dealing with sensor-zapped 
quadrants! You’ll have the help of your 
computer (which resembles a TRS-80 
remarkably) and a detailed report on 
your standings, but this one still isn’t 
easy! There is a FREEZE command, 
though, to allow you to save your pro- 
gress to disk. An excellent plot, with 
excellent graphics to match! Fast, 
too, with embedded Z-80 routines. 
This one’s $19.95 and comes on 
diskette with an orientation manual . . . 
well worth it! We’ve already enjoyed 
hours and hours, and have many more 
to go! 

Order from The Alternate Source, 
1806 Ada Street, Lansing, Ml 48910 
or by phoning (517) 485-0344 or 
487-3358. 
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COMPUCOLOR 

USERS! 

BASIC Training for Compucolor Com- 
puters by Joseph J. Charles 200 pp. 
(1980) (1.5 lbs.) $14.95 

An introduction to statements, func- 
tions, graphics, files, FCS. 

“. . . an excellent book . . . belongs 
alongside every Compucolor com- 
puter within easy reach. ” 

Reviewed by W. Rust, Personal 
Computing June 1980 



Page Mode/Plot Mode Charts. Layout 
forms for graphics and output. 

Pad #101 50 sheets (12 oz.) . . . $3.50 

Satisfaction Guaranteed. Surface 
postage included. Please remit pay- 
ment. 

Joseph J. Charles 

130 Sherwood Dr., 

P.O. Box 750, Dept. C, 

Hilton N.Y. 14468 
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ENGINEERING SOFTWARE 
New from SUPERIOR 
for Structural and Design Engineers! 

STRUCTURAL MATRIX ANALYSIS PROGRAM Calculates mo- 
ments. shears, joint rotation and displacements, and axial forces in 
all members of a two-dimensional frame. Structural analysis input 
of joint coordinates, cross section properties for each member , and 
any number of uniform or point loads on each member. Minimum 
48K. Level II. One disc 49.95 

SECTION PROPERTIES PROGRAM Computes section properties, 
i.e . moments of inertia, section modulus (top. bottom, left, right), 
radius of gyration of built-up members and various shaped indi- 
vidual members 16K, Level II 14.95 



LEISURE PROGRAMS 

BOWLING SECRETARY Let your computer tally fees, total pins, 
games won/lost, hi-10, hi-30, men and women hi-10, hi-30 scratch 
and handicap, lane assignments with individual data, and next 

week’s lanes. 32K, Level II. one disc 14.95 

Lile 7.4 A mathematical simulation of cell colony evolution at a rate 
of 95 generations per minute by John Conway. Patterns can be 
stored on disc or tape for recall at any time. Program can also be 
slowed to 1/3 normal speed or paused indefinitely for closer inspec- 
tion. 4K. Level II Tape, 5.95. Disc. 6.95 

TUMBLING CAROS Mix mind-challenging math, memory, and 
word skill problems with the fun, competition, and luck of an 
exciting casino-style game of cards. Pyramid your skills into imagi- 
nary big-money winnings in the winner's circle. 

16K. Level II Tape. 8.95. Disc. 10.95 



Postage paid. 
Missouri resi- 
dents add 4 Vz% 
sales tax. 

Write 

SUPERIOR for 

information 
about marketing 
your 

SOFTWARE. > 
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For Quiz Kids and Card Sharks 

MOTIVATIONAL NEW 2-PLAYER 



With Hi Level 

“TUMBLING 
CARDS” 

Animated Graphics 



3 QUIZ CATEGORIES. . . 

Elementary Math*Spelllng*Geography 
2 GAMES IN 1 . . .With Casino-Style card Competition 

A great new family game for kids and adults. Mix mind-challenging 
math, memory, ana word skill problems with the fun, competition, 
and luck of an exciting game of cards. Pyramid your skills into 
imaginary big-money winnings in the winner’s circle. Level II, 16K. 



41 



UPERIOR 

OFTWARE 

INC. 

P.O. BOX 11676 
KANSAS CITY. MO 64138 



ONLY 

8 95 

w Postage Paid 

Missouri residents 
add AVi% (40c) 
sales tax. Formatted 
disc price, 10.95. 
Missouri residents 
add 49c sales tax. 



Write Superior for information about marketing your Software. 
^ ^ 
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Featuring 

High Quo lily. Commarool. and 
Economy MocUli 

Comoutor CornoUi for S’29 9i 
Prmiar Standi t39 95. 

Compk'e TIS-IO Su^noii Sy»t*m, 
b«.lt m 
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Ion nay Warranty To Order: 

Send $59.95 
plus $2 50 for 
shipping and 
handling 
Illinois 
Residents 
add 6% tax) 

TRS-80 Soft- 
ware (Specify 
Tape or Disk) 
$10 with 
purchase of 
Micro 
Commander 
Assembled & Tested 

Computer controlled - remote control 

Now an inexpensive and direct carrier current interface between the 
TSR-80 and the BSR X- 1 0 remote control modules. The MICRO 
COMMANDER. X- 10 modules and your computer can control your 
liqhls. appliances, motors. TV. stereo, heaters, alarms, fans, pumps, etc. 

EASY TO USE - NO WIRES TO RUN 
Total control of all X- 10 modules. Utilize all 256 house and unit code 
combinations. Direct interface to AC power line. No command console to 
purchase. No sonic link. Plugs directly into TRS-80 Model 1 (Level llor 
Disk) cassette jack or any I bit input and I bit output TTL port. 
MANUAL INCLUDES ALL SOFTWARE LISTINGS 
The 1 4K basic 4 in I program does the following: 

Loads machine language driver. 

Simulates command console § (■ Q Q 5 

Provides sequential operation. ^ ** ** 

/? Utilizes real lime clock lor control 
//^ Complete documentation includes 8080 source listing. 

INTERFACE TECHNOLOGY 

P.O.Box 383. Des Plaines, ll 60017 
Phone (312) 297*2265 
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EDUCATIONAL MANAGEMENT SOFTWARE 


D P C 


FOR THE APPLE-II 


IMMEDIATE DELIVERY ON SPEC. ED.. 
IMMUNIZATION & FIXED ASSETS INVENTORY 




• SPECIAL EDUCATION ADMINISTRATIVE PACKAGE 


• Student data, Inventory ot Exceptionalities, 
Supplemental Services and Dates 

• Teacher Class Rosters 

• Reports totals & averages of days until 
diagnosis and placement 

• Students printed by specific catagory 


$275.00 


• IMMUNIZATION ADMINISTRATIVE PACKAGE 




• Personal student data & dates for 6-DPT, 5-Polio. 


Rubiola, Rubella, and Mumps 

• Automatically calculates next shot date 

• Prints overdue immunization list by grade 


$275.00 


• FIXED ASSET INVENTORY SYSTEM 




• Full maintenance — Addressed by tag # 

• Reports titled by operator 

• Full descriptive data retained — P.O.#, Model 




Serial #, Repairs, Appraisal, etc. 




• Prints single record, Selected range, or all records; 


also prints on cards 


$275.00 


ALSO AVAILABLE IN MID-OCTOBER 
• BUDGETARY ACCOUNTING PACKAGE 


$375.00 


• ATTENDANCE ACCOUNTING PACKAGE 

• GRADE ACCOUNTING PACKAGE 


$275.00 


• Report cards and Student transcript 




labels 


$300.00 


• CENTRAL ACTIVITY 




ACCOUNTING PACKAGE 


$375.00 


DEALER INQUIRIES INVITED 




2405 San Pedro NE. Albuquerque, NM 871 10 


505-884-6042 
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Free! Bubble Sort Program 
With 



.$ 4.00 



Catalog & Samples . . . 
(Applies to purchase) 



DATQWIK(C) 

Money Maker System $1 89.00 

For TRS-80 (TM) 

Adaptable to other microcomputers 

Software development aids 

TUBE80- Display aid $ 49.00 

NEWLIST Print programs 

w/title & date $ 49.00 

P ASCI I - Disk to LP $ 19.95 

LPDIR- Dir on printer $ 19.95 

Midwest Computer Services 

28 Hiway 75 
Clearwater, MN 55320k 
Call: 1-612-558-2844 
TRS-80 is a trademark of Tandy Co. 
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Moving? 

1 . For FASTEST service attach old 
mailing label in space below. 




c 

'C 

0. 



t 
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Mail to: Circulation Manager 
Personal Computing 
1 050 Commonwealth Ave. 
Boston, MA 0221 5 
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Basic use serial I/O for communications. 

Unit prices start at $28.50 for the 
bare board, $69 for a kit, and $185 for a 
fully assembled and tested board. The 
assembled board is guaranteed for one 
year. For more information contact 
Miller Technology, 16930 Sheldon 
Rd., Los Gatos, CA 95030; (408) 395- 
2999. Circle No. 143 



On-Site Service 
for Apple Products 

Bell and Howell has expanded its 
nationwide service organization to in- 
clude on-site service of Apple Comput- 
ers and is expanding its existing service 
on video products. 

Trained electronic technicians can 
diagnose problems and repair equip- 
ment on the spot, said the company. 
More than 600 Bell & Howell service 
representatives are located across the 
country. Complete parts inventories 
will be maintained locally. 

For more information contact Bell & 
Howell Information Systems Service 
Operations, 6800 McCormick Rd., 
Chicago, IL 60645; (312) 539-1077. 
Circle No. 144 



Turnkey System for 
Small Businesses 

The Minimax, a complete small 
business computing system that is 
marketed through office products 
dealers, was announced by Compu- 
think, Inc. 

Minimax features a set of business 
software programs that are included 
with a hardware system. Both the hard- 
ware and the software are sold together 
as a complete “turnkey” system, giv- 
ing you a computing package that is 
ready for immediate use, the company 
said. 

Minimax’s business software consists 
of seven integrated programs: accounts 
payable, accounts receivable, payroll, 
general ledger, a data base manipula- 
tion program, word processing and a 
program that gives Minimax data 
communications capabilities. 

Hardware comes with a microcom- 
puter that contains a large internal 
memory of 108K bytes, a video display 
terminal, a standard keyboard and a 



floppy disk system that has capacities 
ranging from 800K bytes to 8.4 
megabytes, giving the system the ca- 
pability of storing over 3000 pages of 
data. 

The Minimax system is priced under 
$10,000. For more information, con- 
tact Computhink, 965 West Maude 
Ave., Sunnyvale, CA 94086; (408) 
245-4033. Circle No. 148 



Correction 

A product announcement published 
in the September PC contained errors 
in pricing on a new desk-top business 
system. 

The correct suggested list price for 
the Archives Business System is $6500. 
Archives Incorporated, 404 West 35th 
St., Davenport, IA 52806; (319) 
386-7400. Circle No. 157 



COMPLEMENTS 



Apple Desk 

Fumwood Manufacturing has avail- 
able a computer desk with custom fitted 
areas to hold Apple II or Apple II Plus 
computers. The desk is handcrafted in 
wood on the same lines as the Fum- 
wood desks for larger computers. The 
drawer in front is designed to hold the 




Apple Computer at a comfortable typing 
height, and a space saving custom area 
for the disk drives is easily accessible 
for loading disks. The drawer and disk 
drive area are engineered for air flow 
and cooling. The disk drive area may 
on request have a 4-1/2 inch hole cut 
allowing installation of a muffin fan for 
additional circulation. 

The desk has a work top area of 27" 
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by 48" and is built to a height of 30". It 
is finished in a Salem maple stain but 
can be ordered in other stain finishes. 
The desk is sealed with mar-proof lac- 
quer for protection. Upon request other 
compartments may be custom fitted for 
additional equipment or drawers may 
be added. The back has cable cut outs to 
keep a clean uncluttered look for any- 
where in your home or business. 
Models are also available for the Atari 
and TRS-80 computers. 

Suggested list price is $400. For ad- 
ditional information contact Fumwood 
Manufacturing, Inc., 5665 S. W. Car- 
man Drive, Lake Oswego, OR 97034; 
(503)636-1991. Circle No. 149 



disk drive and drawer for tape and disk 
storage. 

Desks are priced from $298, depend- 
ing on style. Literature is available on 
request. For more information contact 
Data-Mate, The Maine Manufacturing 
Co., 46 Bridge St., Nashua, NH 
03060; (603) 883-5142 or (800) 
258-1678. Circle No. 152 



Data Communication Products 

International Data Sciences, Inc., is 
offering free copies of its new 1980 Cata- 
log of Data Communication Products. 

The 29-page catalog features the 
company’s Hawk 4000 Series Data- 
traps that provide a CRT display of 



on-line data communications. Also de- 
scribed is a complete line of Range 
Rider data test sets for synchronous and 
asynchronous modems, TDMs and 
FDMs; El A and telephone line patch, 
monitor and switching modules for tech 
control centers; data cables; error de- 
tection devices; and MiniTest interface 
monitors and breakout panels for EIA, 
Bell 301/303 and V.35 interfaces. Also 
featured is the new Model 65/60, the 
company’s first hand-held, battery op- 
erated modem test set and breakout 
panel combined. 

For a free catalog write Marketing 
Department, International Data Sci- 
ences, Inc., 7 Wellington Road, Lin- 
coln, RI 02865. Circle No. 154 



Technical Reference Manual 

APF Electronics, Inc., announced 
literature for its personal computer. 
The Imagination Machine with a Tech- 
nical Reference Manual. 

Manual includes nine chapters ex- 
plaining technical details from memory 
maps, memory usage for programs and 
variables to entering and using machine 
language plus saving time and space, 
the company said. The three appen- 
dices include schematics and parts lay- 
out while the entire manual is illus- 
trated with diagrams and charts. 

It is available for $2. For information 
contact APF Electronics Inc., 444 
Madison Ave., New York, NY 10022, 
(800) 223-1264. Circle No. 151 



Computer Terminal Desks 

A new line of stylized computer 
terminal desks that increase work areas 
and save floor space has been intro- 
duced by Data-Mate, The Maine Man- 
ufacturing Company. 

Desks feature large tops and supply 
compartments to enhance operator effi- 
ciency and conserve floor space the 
company said. They also provide leg 
room for operator comfort, and black 
steel frames accented with chestnut 
wood grain tops and trim. 

Available in 27" or 30" heights, the 
desks are offered in 5 styles with 30" x 
48" or 60" tops, and a 19" EIA rack 
mountable bay, supply drawer or hinged 
door cabinet. A tape/diskette model 
includes a compartment for a tape or 
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FOR TRS-80 RS-232 BOARD 
Fix problems due to intermittent 
PC board connector with 
a connector brace. 

Simple to install. 

Only $4.95 PPD (TX residents $5.20 ind. 
tax) 

Gunn Industries) 

704 Franklin Blvd. 

Austin, TX 78751 



INTERFACING TRS-80 to IBM electronic 
typewriter — No hardware modification, 
diagrams, codes & information, $3.75. 
Software listing, $4. 

FC&T, Box 57563, Webster, TX 77598. 



TBUGX - Extend your Tandy TBUG with six 
powerful commands: 

T - Trace instructions in step or run mode 
— ► - Move and relocate: TBUG & any instr., 
addr. , or memory 
H- Halt at any address 
D- Control trace display 
S - Display 12 levels of stack 
: - Set any register or pair 
Requires Level 2 TBUG, +< 1 .3K. 

Cassette and manual — $8.50 (FL residents add 4$ 
sales tax) ADVANCED DEVELOPMENT 
SYSTEMS, BOX 62, ORANGE PARK, FL 32073 
Tele. #1-904-264 8194 



BASIC EXTENSION — Maximize the 
power of your TRS-80 Level II computer with 
MAX. Machine language program patches into 
BASIC ROM and features line referencing by name 
for jumps and subroutines, winking cursor, 
appending programs, fast saving and loading of all 
variables, single stepping during execution, over- 
laying of BASIC programs and more. Uses less than 
750 bytes of memory. 

$12 R.C. Page, 100 Meehan Dr., Dayton, OH 45431 



SLOW RUN your machine language 
programs for TStep, TBug users who are 
tired of hitting the space bar. TStep, TBug, 
TLegs is required but not included. Self 
linking, self relocating, variable speed slow 
stepper Level II system cassette and 
documentation $9.95ppd; Jerry Bell, 536 S. 
2nd, Fairfax, OK 74637. 

UNDERSTAND COMPUTERS 
AND DATA PROCESSING 

Now you can learn more about com- 
puters/DP in your spare time. Cassette 
learning seminar based on college course 
designed and taught by author. Listen 
while driving or relaxing. 

Send $19.95 (plus $2.00 p and h) and 
request learning module C-10. Receive 
first learning module plus capsule 
summary of complete series and study 
booklet. Contains more than 2 hours of 
informative and practical instruction. 

Career Enhancement Institute 
361 Virginia Street 
Crystal Lake, IL 60014 



HATE TO TYPE? For $1 per “K” we will 
type your favorite TRS-80 Basic programs 
onto cassette tape up to 16K. Please send 
original program listing plus $3.50 to cover 
postage & handling to ensure proper delivery 
C-SAVE-IT, P.O. BOX 37506, OMAHA, 
NE 68137 
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WHAT’S COMING UP 



\ 



CAREERS IN 
PUBLISHING 



Boston-based International Pub- 
lishing Corporation on street car line 
has the following openings: 

Managing Editor 

Ideal candidate will be familiar with 
all aspects of magazine production 
and possess the ability to meet a 
monthly deadline — on time. 3 years 
experience plus science communi- 
cations (or similar) degree required. 
Knowledge of electronic technology 
is desirable. 

Assistant Editor 

Candidate should have degree in 
journalism or English with at least 
one year’s editing experience. 
Knowledge of electronic industry 
helpful. Electrical engineers who 
may be interested in a career in 
publishing are also encouraged to 
apply. 

Please no calls — send resume to 
Leonard Spitz, Editor, Circuits Man- 
ufacturing, Benwill Publishing Corp., 
1050 Commonwealth Ave., Boston, 

MA 02215 

V / 



On-Site Service For HP-85 

Hewlett-Packard now offers “on- 
site” service as well as its previously 
offered “return to HP” service for the 
HP-85 personal computer. 

Under the on-site service agreement, 
which has covered other HP desktop 
computers, HP-85 system owners pay a 
monthly cost for next-day response to 
all sites within 100 miles of an HP ser- 
vice-responsible office. 

Cost of the on-site agreement is $25 
per month. For an additional fee, HP- 
85 peripherals such as printers, plotters 
and flexible disk drives will be covered 
by the on-site agreement. 

HP-85 owners farther than 100 miles 
from an HP service-responsible office 
will be covered by an on-site service 
agreement with a longer response time 
and a higher price. 

Those who don’t require as compre- 
hensive an agreement may, for $17 per 
month, choose a field repair center ser- 
vice agreement. Under this plan, a unit 
needing service is shipped to one of the 



designated HP field repair centers 
throughout the world. HP will fix and 
ship the unit within three days of 
receipt. 

Owners of HP-85s purchased before 
these agreements became applicable will 
be able to obtain coverage if their units 
are still under warranty. Machines that 
are out of warranty must be inspected 
before they will be covered by the new 
agreements. 

The on-site service agreement will 
be offered on all HP-85s, whether sold 
by computer stores, office machine 
dealers or HP’s sales force. 

The HP 2621 terminals, which re- 
cently became available through 
dealers, also can be covered by an on- 
site service agreement. 

For additional information on ob- 
taining an on-site service agreement, 
see your local dealer or contact In- 
quiries Manager, Hewlett-Pakcard Co., 
1507 Page Mill Rd., Palo Alto, CA 
94304; (800) 547-3400 (in Oregon, 
758-1010). Circle No. 112 
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SALES OFFICES 

• Northeast: Arlene Joseph, Benwill Publishing Corp., c/o Morgan- 
Grampian, Inc., 2 Park Ave., New York, NY 10016; (212) 340-9780. 

• California: Michael Reynolds, 924 Westwood Blvd., Los Angeles, 
CA 90024; (213) 478-3017. 

• Japan: K. Yanigihara, International Business Corp., 10-10 Shinjuku 
3-chome, Shinjuku, Tokyo, 160 Japan: (03) 350-0272. 
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Transform your programming language 
into a real data base management system 



HDBS interfaces 
with CBASIC under CP/M, 
with TRS-80 (Models I and II) 
and with APPLE DOS. 



A major breakthrough in data handling for 
micros! At best, existing programming 
languages provide only rudimentary file 
handling capabilities. With HDBS 
(Hierarchical Data Base System), you can 
now transform your programming 
language from an ordinary file handling 
system into a flexible, powerful, and 
productive data base management system. 

HDBS provides the two components any 
genuine data base system must have: 

1. The Data Description Language (DDL), an 
easy-to-use, stand-alone language for 
specifying blueprints or schemas of data base 
organization. 

2. The Data Manipulation Language (DML) for 
manipulating (storing, accessing, modifying, 
deleting) data organized according to a data 
base blueprint. The DML extends your data 
handling capabilities by allowing you to 
embed powerful data manipulation 
commands in the programs you write. The 
commands are stated through the “CALL” 
facilities of your programming language. 

HDBS users are. . . 

• free of the need to design files. 

• free of the need to merge files; there is no 
scattering of data over several files. Records of 
many different types are automatically 
maintained in a single, integrated 
organization., .one that can be spread over 
numerous disk drives. 

• free of the need to be concerned with disk I/O 
because it is handled automatically by HDBS. 

HDBS offers... 

• hierarchical schema designs. 

• data base schemas of up to 254 record types; 
each record type may contain up to 255 fields. 
The size of a field may be up to several 
thousand bytes in length. 

• data bases spread over one to eight disk 
drives. HDBS is independent of the sizes and 
types of drives. 

• user-defined names for fields, record types, 
and sets. 

• records maintainable in several sorted 
orders. . .and in other orders as well. 

• written in machine language for maximum 
execution efficiency and minimal memory 
usage. 

• available versions: Z80 (requires approx. 18K), 
6502 (approx. 26K), 8080 (approx. 22K). Total 
memory requirement must allow for buffer 
areas. 

For more information on the HDBS, write or call 
us today! 



HDBS can be used to extend any of the 
following programming languages under 
the indicated operating systems: 

CP/M with CBASIC; Microsoft BASICS, 
FORTRAN or COBOL: InterSystem 
PASCAL/Z; Sorcim PASCAL/M; Micro Focus 
CIS COBOL; Digital Research PL/I 
MVT/FAMOS with BASIC 
OASIS with BASIC 

TRSDOS and NEWDOS (Models I and II) with 
Disk BASIC 

North Star DOS with North Star BASIC 
Apple DOS and Applesoft BASIC 
Machine Language interface available on all 
above systems. 

Note: Because HDBS can be integrated with a 
wide range of languages and operating systems, 
it provides uniform methods of data handling 
across those many languages and systems. 

HDBS/QRS. An interactive Report- 
Writer/Query-System with these features: 

• may be customized for non-technical users. 

• complex retrieval conditions may be specified. 

• detailed reports can be quickly generated. 

• wildcard and “match-one” string specifications 
included. 

HDBS/SRS. This Schema Redesign System 
permits. . . 

• renaming fields, record types, sets. 

• adding new fields to existing record types. 

• allocating additional pages to an existing data 
base. 

Ordering information (applicable to Z80, 

8080, and 6502 versions): 



3 CP/M - 

4 CP/M - 
5. CP/M- 

6 CP/M- 

7. CP/M - 

8. CP/M - 



HDBS $300.00 

HDBS/QRS 300.00 

HDBS/SRS 150.00 

HDBS/QRS/SRS Package 675.00 

HDBS expansion to MDBS* 650.00 

HDBS Manual 35.00 

QRS Manual 5.00 

SRS Manual 5.00 

System Specific Manuals (each) 5.00 
Guide to 

Data Base Management 10.00 

*HDBS may be expanded at any 
time to full network data base 
management system: 

MDBS. DMS/MDBS. DDL 

Within a given operating system, 
add $125.00 for each additional 
language selected 

For prices outside the U S. and 
Canada, please ask for price lists. 

Add $2 50 handling fee for non-cash Indiana residents add 4%. 
order ($5.00 outside U S.) We accept Visa and Master Charge 



When ordering, specify intended 
use with . . . 

1 North Star DOS and BASIC 
2. CP/M - CBASIC 

Microsoft BASIC 4.XX 
Microsoft BASIC 5.XX 
Microsoft BASIC or 
FORTRAN Compiler 
Microsoft COBOL-80 
InterSystem PASCAL/Z 
Sorcim PASCAL/M 
9 CP/M - Digital Research PL/I 

10. CP/M - Micro Focus CIS 

COBOL 

11. TRSDOS/NEWDOS and TRS 
Disk BASIC (Models I and II) 

12. Apple DOS and Applesoft BASIC 
13 MVT/FAMOS and BASIC 

14. OASIS and OASIS BASIC * 

15. Machine Language Programs 
(Specify operating system.) 



I Micro 
Data Base 
Systems, inc. 

Box 248, Lafayette, Indiana 47902 
317-742-7388 or 317-448-1616 



Micro Data Base Systems, Inc. 

Setting standards of excellence for data base software. . .worldwide. 



See Us at the National Small Computer Show, NY Coliseum, Booth 4209 
CIRCLE 70 






When It Comes 
To Add-on Memory... 

LOBO 
Has It All. 

LOBO DRIVES manufactures a full line of S-100 
computer compatible disk drives. All drives are 
software compatible with most S-100 disk operating 
systems and applications software programs. Only 
LOBO DRIVES offers you the variety and choice of 
floppy and fixed disk drives. Choose from 5% and 
8-inch floppies, SVi and 8-inch Winchester technology 
fixed disk drives, and several Floppy/Fixed disk 
combinations. Each LOBO DRIVES system is 
thoroughly tested and burned-in and has the famous 
LOBO DRIVES One Year, 100% Parts/Labor 
Warranty. 




MODEL 400 5V4-INCH FLOPPY 
DISK MEMORY SYSTEM 



A high-speed (298) Msec Access), high- 
reliability (8000 hrs MTBF), low-cost floppy 
disk memory system. It is available in both 
soft and hard sector formats, and a choice 
of single or double density configurations. 

• Up to 220 KBytes Capacity 

• Single/Double Density 

• Soft Sector Format 

• Complete Software Compatibility 



MODEL 800/850 DUAL FLOPPY 
DISK DRIVE MEMORY SYSTEM 



LOBO DRIVES offers you a choice of 
single-sided, single or double density 
(Model 800) or double-sided, single or 
double density (Model 850) dual 8-inch 
memory subsystems. Each system comes 
complete with chassis and power supply, 
cables, controller and interface. 

• Compatible with Most S-1 00 DOS 
Systems 

• Up to 3.2 MByte Capacity 



MODEL 1850 DUAL 
FLOPPY/FIXED DISK MEMORY 
SYSTEM 



No more worries about back-up. LOBO 
DRIVES has combined the latest state-of- 
the-art Winchester technology with the pro- 
ven reliability and dependability of its Model 
850 8-inch floppy disk drive to bring you the 
ultimate in memory expansion for your 
S-100 computer. The Model 1850 is the 
ideal memory system for small business 
and word processing applications. 

• 5 or 10 MByte Fixed Disk Capacity 

• 1 .6 MByte Floppy Disk Capacity 

• Software Compatibility 

• Sealed Environment 

• Winchester Reliability 

• 70 Msec Average Access Time 



MODEL 950 DUAL 
FLOPPY/FIXED DISK MEMORY 
SYSTEM 



All the advantages of Winchester 
technology fixed disk memory: large 
capacity (6.38 MBytes), high speed (170 
Msec avg. access time), and extended 
reliability, combined with the convenience 
of a built-in floppy disk back-up in one 
cabinet. Only LOBO can bring you the 
storage capacity of 16 mini-floppies at a 
fraction of the price. 

• The Storage Capacity of 1 6 Mini- 
Floppies 

• Built-in Back-up 

• 1 70 Msec Access (Avg) 

• Software Compatibility 



See your nearest dealer, call, or write for the complete LOBO DRIVES story... 
find out just how competitively priced a quality drive can be. 



935 Camino Del Sur 
Goleta, California 93017 
( 805 ) 685-4546 
international Telex: 658 482 
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